// export SoldLevel , EngLevel , MechLevel , SciLevel , ZakazWejsciaDoEona ; starting begin ZakazWejsciaDoEona = 0 ;
   0: LD_ADDR_EXP 5
   4: PUSH
   5: LD_INT 0
   7: ST_TO_ADDR
// PrepareHero1 ;
   8: CALL 3472 0 0
// PrepareAmerican ;
  12: CALL 605 0 0
// InGameOn ;
  16: CALL_OW 8
// Center = 1 ;
  20: LD_ADDR_EXP 69
  24: PUSH
  25: LD_INT 1
  27: ST_TO_ADDR
// ComMoveXY ( OWChyba , 74 , 26 ) ;
  28: LD_EXP 11
  32: PPUSH
  33: LD_INT 74
  35: PPUSH
  36: LD_INT 26
  38: PPUSH
  39: CALL_OW 111
// AddComMoveXY ( OWChyba , 78 , 35 ) ;
  43: LD_EXP 11
  47: PPUSH
  48: LD_INT 78
  50: PPUSH
  51: LD_INT 35
  53: PPUSH
  54: CALL_OW 171
// Say ( OWChyba , A1 ) ;
  58: LD_EXP 11
  62: PPUSH
  63: LD_STRING A1
  65: PPUSH
  66: CALL_OW 88
// end ;
  70: END
// every 0 0$01 trigger IsInArea ( OWChyba , Spr ) do
  71: LD_EXP 11
  75: PPUSH
  76: LD_INT 4
  78: PPUSH
  79: CALL_OW 308
  83: IFFALSE 535
  85: GO 87
  87: DISABLE
// begin ComHold ( OWCHyba ) ;
  88: LD_EXP 11
  92: PPUSH
  93: CALL_OW 140
// wait ( 0 0$01 ) ;
  97: LD_INT 35
  99: PPUSH
 100: CALL_OW 67
// Arabian_right_1 ;
 104: CALL 7033 0 0
// wait ( 0 0$04 ) ;
 108: LD_INT 140
 110: PPUSH
 111: CALL_OW 67
// Say ( OWChyba , A2 ) ;
 115: LD_EXP 11
 119: PPUSH
 120: LD_STRING A2
 122: PPUSH
 123: CALL_OW 88
// SayRadio ( OWChyba , A3 ) ;
 127: LD_EXP 11
 131: PPUSH
 132: LD_STRING A3
 134: PPUSH
 135: CALL_OW 94
// SayRadio ( PULK_01 , A4 ) ;
 139: LD_INT 454
 141: PPUSH
 142: LD_STRING A4
 144: PPUSH
 145: CALL_OW 94
// SayRadio ( OWChyba , A5 ) ;
 149: LD_EXP 11
 153: PPUSH
 154: LD_STRING A5
 156: PPUSH
 157: CALL_OW 94
// SayRadio ( PULK_01 , A6 ) ;
 161: LD_INT 454
 163: PPUSH
 164: LD_STRING A6
 166: PPUSH
 167: CALL_OW 94
// SayRadio ( OWChyba , A7 ) ;
 171: LD_EXP 11
 175: PPUSH
 176: LD_STRING A7
 178: PPUSH
 179: CALL_OW 94
// SayRadio ( PULK_01 , A8 ) ;
 183: LD_INT 454
 185: PPUSH
 186: LD_STRING A8
 188: PPUSH
 189: CALL_OW 94
// center = 0 ;
 193: LD_ADDR_EXP 69
 197: PUSH
 198: LD_INT 0
 200: ST_TO_ADDR
// InGameOff ;
 201: CALL_OW 9
// ChangeMissionObjectives ( M1 ) ;
 205: LD_STRING M1
 207: PPUSH
 208: CALL_OW 337
// SaveForQuickRestart ;
 212: CALL_OW 22
// wait ( 1 1$0 ) ;
 216: LD_INT 2100
 218: PPUSH
 219: CALL_OW 67
// SayRadio ( Nefarem , N1 ) ;
 223: LD_EXP 12
 227: PPUSH
 228: LD_STRING N1
 230: PPUSH
 231: CALL_OW 94
// SayRadio ( OWChyba , N2 ) ;
 235: LD_EXP 11
 239: PPUSH
 240: LD_STRING N2
 242: PPUSH
 243: CALL_OW 94
// SayRadio ( Nefarem , N3 ) ;
 247: LD_EXP 12
 251: PPUSH
 252: LD_STRING N3
 254: PPUSH
 255: CALL_OW 94
// SayRadio ( OWChyba , N4 ) ;
 259: LD_EXP 11
 263: PPUSH
 264: LD_STRING N4
 266: PPUSH
 267: CALL_OW 94
// wait ( 5 5$0 ) ;
 271: LD_INT 10500
 273: PPUSH
 274: CALL_OW 67
// Arabian_right ;
 278: CALL 4401 0 0
// ATAK_PRAWA_1_1 ;
 282: CALL 7706 0 0
// wait ( 6 6$0 ) ;
 286: LD_INT 12600
 288: PPUSH
 289: CALL_OW 67
// Arabian_right ;
 293: CALL 4401 0 0
// ATAK_PRAWA_1_1 ;
 297: CALL 7706 0 0
// wait ( 6 6$0 ) ;
 301: LD_INT 12600
 303: PPUSH
 304: CALL_OW 67
// Arabian_right ;
 308: CALL 4401 0 0
// ATAK_PRAWA_1_1 ;
 312: CALL 7706 0 0
// wait ( 0 0$10 ) ;
 316: LD_INT 350
 318: PPUSH
 319: CALL_OW 67
// Say ( OWChyba , A10 ) ;
 323: LD_EXP 11
 327: PPUSH
 328: LD_STRING A10
 330: PPUSH
 331: CALL_OW 88
// wait ( 1 1$0 ) ;
 335: LD_INT 2100
 337: PPUSH
 338: CALL_OW 67
// Say ( PULK_02 , A11 ) ;
 342: LD_EXP 70
 346: PPUSH
 347: LD_STRING A11
 349: PPUSH
 350: CALL_OW 88
// wait ( 5 5$0 ) ;
 354: LD_INT 10500
 356: PPUSH
 357: CALL_OW 67
// zdrajcy ;
 361: CALL 6445 0 0
// wait ( 0 0$04 ) ;
 365: LD_INT 140
 367: PPUSH
 368: CALL_OW 67
// Say ( OWChyba , A12 ) ;
 372: LD_EXP 11
 376: PPUSH
 377: LD_STRING A12
 379: PPUSH
 380: CALL_OW 88
// wait ( 0 0$02 ) ;
 384: LD_INT 70
 386: PPUSH
 387: CALL_OW 67
// Say ( OWChyba , A13 ) ;
 391: LD_EXP 11
 395: PPUSH
 396: LD_STRING A13
 398: PPUSH
 399: CALL_OW 88
// dialogueon ;
 403: CALL_OW 6
// ingameon ;
 407: CALL_OW 8
// SayRadio ( PULK_01 , A14 ) ;
 411: LD_INT 454
 413: PPUSH
 414: LD_STRING A14
 416: PPUSH
 417: CALL_OW 94
// SayRadio ( PULK_02 , A15 ) ;
 421: LD_EXP 70
 425: PPUSH
 426: LD_STRING A15
 428: PPUSH
 429: CALL_OW 94
// SayRadio ( PULK_01 , A16 ) ;
 433: LD_INT 454
 435: PPUSH
 436: LD_STRING A16
 438: PPUSH
 439: CALL_OW 94
// dialogueoff ;
 443: CALL_OW 7
// ingameoff ;
 447: CALL_OW 9
// Arabian_left ;
 451: CALL 3553 0 0
// Arabian_left ;
 455: CALL 3553 0 0
// Arabian_right ;
 459: CALL 4401 0 0
// Arabian_right ;
 463: CALL 4401 0 0
// ATAK_LEWA_1 ;
 467: CALL 5487 0 0
// wait ( 0 0$10 ) ;
 471: LD_INT 350
 473: PPUSH
 474: CALL_OW 67
// Say ( OWChyba , A17 ) ;
 478: LD_EXP 11
 482: PPUSH
 483: LD_STRING A17
 485: PPUSH
 486: CALL_OW 88
// wait ( 0 0$10 ) ;
 490: LD_INT 350
 492: PPUSH
 493: CALL_OW 67
// Say ( OWChyba , A19 ) ;
 497: LD_EXP 11
 501: PPUSH
 502: LD_STRING A19
 504: PPUSH
 505: CALL_OW 88
// ATAK_PRAWA_1 ;
 509: CALL 5997 0 0
// wait ( 0 0$02 ) ;
 513: LD_INT 70
 515: PPUSH
 516: CALL_OW 67
// ChangeMissionObjectives ( M2 ) ;
 520: LD_STRING M2
 522: PPUSH
 523: CALL_OW 337
// ZakazWejsciaDoEona = 1 ;
 527: LD_ADDR_EXP 5
 531: PUSH
 532: LD_INT 1
 534: ST_TO_ADDR
// end ;
 535: END
// on EnterBuilding ( b , un ) do begin if b = eon then
 536: LD_VAR 0 1
 540: PUSH
 541: LD_INT 442
 543: EQUAL
 544: IFFALSE 602
// if ZakazWejsciaDoEona = 0 then
 546: LD_EXP 5
 550: PUSH
 551: LD_INT 0
 553: EQUAL
 554: IFFALSE 565
// begin YouLost ( Eon ) ;
 556: LD_STRING Eon
 558: PPUSH
 559: CALL_OW 104
// end else
 563: GO 602
// if ZakazWejsciaDoEona = 1 and un = OWChyba then
 565: LD_EXP 5
 569: PUSH
 570: LD_INT 1
 572: EQUAL
 573: PUSH
 574: LD_VAR 0 2
 578: PUSH
 579: LD_EXP 11
 583: EQUAL
 584: AND
 585: IFFALSE 602
// begin wait ( 0 0$2 ) ;
 587: LD_INT 70
 589: PPUSH
 590: CALL_OW 67
// medale ;
 594: CALL 6988 0 0
// youwin ;
 598: CALL_OW 103
// end ; end ; end_of_file
 602: PPOPN 2
 604: END
// export comp_engs3 , comp_engs2 , AmericanPerson , Am1_Turret , Am2_Turret ; export function PrepareAmerican ; var am_turret , i , un , b , x1 , y1 , k , l , level , am_depot1 , comp_units , am_depot2 , am_fab , am_lab ; begin
 605: LD_INT 0
 607: PPUSH
 608: PPUSH
 609: PPUSH
 610: PPUSH
 611: PPUSH
 612: PPUSH
 613: PPUSH
 614: PPUSH
 615: PPUSH
 616: PPUSH
 617: PPUSH
 618: PPUSH
 619: PPUSH
 620: PPUSH
 621: PPUSH
// Am1_Turret := FilterUnitsInArea ( SIDE1_1 , [ [ f_side , 1 ] , [ f_btype , b_bunker ] ] ) ;
 622: LD_ADDR_EXP 9
 626: PUSH
 627: LD_INT 1
 629: PPUSH
 630: LD_INT 22
 632: PUSH
 633: LD_INT 1
 635: PUSH
 636: EMPTY
 637: LIST
 638: LIST
 639: PUSH
 640: LD_INT 30
 642: PUSH
 643: LD_INT 32
 645: PUSH
 646: EMPTY
 647: LIST
 648: LIST
 649: PUSH
 650: EMPTY
 651: LIST
 652: LIST
 653: PPUSH
 654: CALL_OW 70
 658: ST_TO_ADDR
// uc_side = 1 ;
 659: LD_ADDR_OWVAR 20
 663: PUSH
 664: LD_INT 1
 666: ST_TO_ADDR
// uc_nation = 1 ;
 667: LD_ADDR_OWVAR 21
 671: PUSH
 672: LD_INT 1
 674: ST_TO_ADDR
// hc_gallery =  ;
 675: LD_ADDR_OWVAR 33
 679: PUSH
 680: LD_STRING 
 682: ST_TO_ADDR
// hc_name =  ;
 683: LD_ADDR_OWVAR 26
 687: PUSH
 688: LD_STRING 
 690: ST_TO_ADDR
// for i in Am1_Turret do
 691: LD_ADDR_VAR 0 3
 695: PUSH
 696: LD_EXP 9
 700: PUSH
 701: FOR_IN
 702: IFFALSE 873
// begin if IsInUnit ( i ) = 0 then
 704: LD_VAR 0 3
 708: PPUSH
 709: CALL_OW 310
 713: PUSH
 714: LD_INT 0
 716: EQUAL
 717: IFFALSE 871
// begin Level = 5 ;
 719: LD_ADDR_VAR 0 10
 723: PUSH
 724: LD_INT 5
 726: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
 727: LD_ADDR_OWVAR 29
 731: PUSH
 732: LD_INT 9
 734: PPUSH
 735: LD_INT 11
 737: PPUSH
 738: CALL_OW 12
 742: PUSH
 743: LD_INT 10
 745: PPUSH
 746: LD_INT 12
 748: PPUSH
 749: CALL_OW 12
 753: PUSH
 754: EMPTY
 755: LIST
 756: LIST
 757: ST_TO_ADDR
// hc_skills = [ Level , Rand ( 1 , 3 ) , Rand ( 1 , 2 ) , Rand ( 1 , 2 ) ] ;
 758: LD_ADDR_OWVAR 31
 762: PUSH
 763: LD_VAR 0 10
 767: PUSH
 768: LD_INT 1
 770: PPUSH
 771: LD_INT 3
 773: PPUSH
 774: CALL_OW 12
 778: PUSH
 779: LD_INT 1
 781: PPUSH
 782: LD_INT 2
 784: PPUSH
 785: CALL_OW 12
 789: PUSH
 790: LD_INT 1
 792: PPUSH
 793: LD_INT 2
 795: PPUSH
 796: CALL_OW 12
 800: PUSH
 801: EMPTY
 802: LIST
 803: LIST
 804: LIST
 805: LIST
 806: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
 807: LD_ADDR_OWVAR 27
 811: PUSH
 812: LD_INT 1
 814: PPUSH
 815: LD_INT 2
 817: PPUSH
 818: CALL_OW 12
 822: ST_TO_ADDR
// hc_class = 1 ;
 823: LD_ADDR_OWVAR 28
 827: PUSH
 828: LD_INT 1
 830: ST_TO_ADDR
// un := CreateHuman ;
 831: LD_ADDR_VAR 0 4
 835: PUSH
 836: CALL_OW 44
 840: ST_TO_ADDR
// PlaceHumanInUnit ( un , i ) ;
 841: LD_VAR 0 4
 845: PPUSH
 846: LD_VAR 0 3
 850: PPUSH
 851: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
 855: LD_ADDR_EXP 8
 859: PUSH
 860: LD_EXP 8
 864: PUSH
 865: LD_VAR 0 4
 869: ADD
 870: ST_TO_ADDR
// end ; end ;
 871: GO 701
 873: POP
 874: POP
// Am2_Turret := FilterUnitsInArea ( SIDE2_2 , [ [ f_side , 4 ] , [ f_btype , b_bunker ] ] ) ;
 875: LD_ADDR_EXP 10
 879: PUSH
 880: LD_INT 2
 882: PPUSH
 883: LD_INT 22
 885: PUSH
 886: LD_INT 4
 888: PUSH
 889: EMPTY
 890: LIST
 891: LIST
 892: PUSH
 893: LD_INT 30
 895: PUSH
 896: LD_INT 32
 898: PUSH
 899: EMPTY
 900: LIST
 901: LIST
 902: PUSH
 903: EMPTY
 904: LIST
 905: LIST
 906: PPUSH
 907: CALL_OW 70
 911: ST_TO_ADDR
// uc_side = 4 ;
 912: LD_ADDR_OWVAR 20
 916: PUSH
 917: LD_INT 4
 919: ST_TO_ADDR
// uc_nation = 1 ;
 920: LD_ADDR_OWVAR 21
 924: PUSH
 925: LD_INT 1
 927: ST_TO_ADDR
// hc_gallery =  ;
 928: LD_ADDR_OWVAR 33
 932: PUSH
 933: LD_STRING 
 935: ST_TO_ADDR
// hc_name =  ;
 936: LD_ADDR_OWVAR 26
 940: PUSH
 941: LD_STRING 
 943: ST_TO_ADDR
// for i in Am2_Turret do
 944: LD_ADDR_VAR 0 3
 948: PUSH
 949: LD_EXP 10
 953: PUSH
 954: FOR_IN
 955: IFFALSE 1116
// begin if IsInUnit ( i ) = 0 then
 957: LD_VAR 0 3
 961: PPUSH
 962: CALL_OW 310
 966: PUSH
 967: LD_INT 0
 969: EQUAL
 970: IFFALSE 1114
// begin hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
 972: LD_ADDR_OWVAR 29
 976: PUSH
 977: LD_INT 9
 979: PPUSH
 980: LD_INT 11
 982: PPUSH
 983: CALL_OW 12
 987: PUSH
 988: LD_INT 10
 990: PPUSH
 991: LD_INT 12
 993: PPUSH
 994: CALL_OW 12
 998: PUSH
 999: EMPTY
1000: LIST
1001: LIST
1002: ST_TO_ADDR
// hc_skills = [ 6 , Rand ( 1 , 3 ) , Rand ( 1 , 2 ) , Rand ( 1 , 2 ) ] ;
1003: LD_ADDR_OWVAR 31
1007: PUSH
1008: LD_INT 6
1010: PUSH
1011: LD_INT 1
1013: PPUSH
1014: LD_INT 3
1016: PPUSH
1017: CALL_OW 12
1021: PUSH
1022: LD_INT 1
1024: PPUSH
1025: LD_INT 2
1027: PPUSH
1028: CALL_OW 12
1032: PUSH
1033: LD_INT 1
1035: PPUSH
1036: LD_INT 2
1038: PPUSH
1039: CALL_OW 12
1043: PUSH
1044: EMPTY
1045: LIST
1046: LIST
1047: LIST
1048: LIST
1049: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
1050: LD_ADDR_OWVAR 27
1054: PUSH
1055: LD_INT 1
1057: PPUSH
1058: LD_INT 2
1060: PPUSH
1061: CALL_OW 12
1065: ST_TO_ADDR
// hc_class = 1 ;
1066: LD_ADDR_OWVAR 28
1070: PUSH
1071: LD_INT 1
1073: ST_TO_ADDR
// un := CreateHuman ;
1074: LD_ADDR_VAR 0 4
1078: PUSH
1079: CALL_OW 44
1083: ST_TO_ADDR
// PlaceHumanInUnit ( un , i ) ;
1084: LD_VAR 0 4
1088: PPUSH
1089: LD_VAR 0 3
1093: PPUSH
1094: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
1098: LD_ADDR_EXP 8
1102: PUSH
1103: LD_EXP 8
1107: PUSH
1108: LD_VAR 0 4
1112: ADD
1113: ST_TO_ADDR
// end ; end ;
1114: GO 954
1116: POP
1117: POP
// for i in fabryka1 do
1118: LD_ADDR_VAR 0 3
1122: PUSH
1123: LD_INT 375
1125: PUSH
1126: FOR_IN
1127: IFFALSE 1377
// begin l = 0 ;
1129: LD_ADDR_VAR 0 9
1133: PUSH
1134: LD_INT 0
1136: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
1137: LD_VAR 0 3
1141: PPUSH
1142: CALL_OW 310
1146: PUSH
1147: LD_INT 0
1149: EQUAL
1150: IFFALSE 1375
// begin Level = [ 6 , 6 , 6 ] [ Difficulty ] ;
1152: LD_ADDR_VAR 0 10
1156: PUSH
1157: LD_INT 6
1159: PUSH
1160: LD_INT 6
1162: PUSH
1163: LD_INT 6
1165: PUSH
1166: EMPTY
1167: LIST
1168: LIST
1169: LIST
1170: PUSH
1171: LD_OWVAR 67
1175: ARRAY
1176: ST_TO_ADDR
// repeat begin uc_side = 4 ;
1177: LD_ADDR_OWVAR 20
1181: PUSH
1182: LD_INT 4
1184: ST_TO_ADDR
// uc_nation = 1 ;
1185: LD_ADDR_OWVAR 21
1189: PUSH
1190: LD_INT 1
1192: ST_TO_ADDR
// hc_gallery =  ;
1193: LD_ADDR_OWVAR 33
1197: PUSH
1198: LD_STRING 
1200: ST_TO_ADDR
// hc_name =  ;
1201: LD_ADDR_OWVAR 26
1205: PUSH
1206: LD_STRING 
1208: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
1209: LD_ADDR_OWVAR 29
1213: PUSH
1214: LD_INT 9
1216: PPUSH
1217: LD_INT 11
1219: PPUSH
1220: CALL_OW 12
1224: PUSH
1225: LD_INT 10
1227: PPUSH
1228: LD_INT 12
1230: PPUSH
1231: CALL_OW 12
1235: PUSH
1236: EMPTY
1237: LIST
1238: LIST
1239: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Level , Rand ( 0 , 1 ) ] ;
1240: LD_ADDR_OWVAR 31
1244: PUSH
1245: LD_INT 0
1247: PPUSH
1248: LD_INT 3
1250: PPUSH
1251: CALL_OW 12
1255: PUSH
1256: LD_INT 0
1258: PPUSH
1259: LD_INT 1
1261: PPUSH
1262: CALL_OW 12
1266: PUSH
1267: LD_VAR 0 10
1271: PUSH
1272: LD_INT 0
1274: PPUSH
1275: LD_INT 1
1277: PPUSH
1278: CALL_OW 12
1282: PUSH
1283: EMPTY
1284: LIST
1285: LIST
1286: LIST
1287: LIST
1288: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
1289: LD_ADDR_OWVAR 27
1293: PUSH
1294: LD_INT 1
1296: PPUSH
1297: LD_INT 2
1299: PPUSH
1300: CALL_OW 12
1304: ST_TO_ADDR
// hc_class = 3 ;
1305: LD_ADDR_OWVAR 28
1309: PUSH
1310: LD_INT 3
1312: ST_TO_ADDR
// un = CreateHuman ;
1313: LD_ADDR_VAR 0 4
1317: PUSH
1318: CALL_OW 44
1322: ST_TO_ADDR
// PlaceHumanInUnit ( un , fabryka1 ) ;
1323: LD_VAR 0 4
1327: PPUSH
1328: LD_INT 375
1330: PPUSH
1331: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
1335: LD_ADDR_EXP 8
1339: PUSH
1340: LD_EXP 8
1344: PUSH
1345: LD_VAR 0 4
1349: ADD
1350: ST_TO_ADDR
// l = l + 1 ;
1351: LD_ADDR_VAR 0 9
1355: PUSH
1356: LD_VAR 0 9
1360: PUSH
1361: LD_INT 1
1363: PLUS
1364: ST_TO_ADDR
// end until l = 4 ;
1365: LD_VAR 0 9
1369: PUSH
1370: LD_INT 4
1372: EQUAL
1373: IFFALSE 1177
// end ; end ;
1375: GO 1126
1377: POP
1378: POP
// for i in lab1 do
1379: LD_ADDR_VAR 0 3
1383: PUSH
1384: LD_INT 278
1386: PUSH
1387: FOR_IN
1388: IFFALSE 1638
// begin l = 0 ;
1390: LD_ADDR_VAR 0 9
1394: PUSH
1395: LD_INT 0
1397: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
1398: LD_VAR 0 3
1402: PPUSH
1403: CALL_OW 310
1407: PUSH
1408: LD_INT 0
1410: EQUAL
1411: IFFALSE 1636
// begin Level = [ 4 , 4 , 4 ] [ Difficulty ] ;
1413: LD_ADDR_VAR 0 10
1417: PUSH
1418: LD_INT 4
1420: PUSH
1421: LD_INT 4
1423: PUSH
1424: LD_INT 4
1426: PUSH
1427: EMPTY
1428: LIST
1429: LIST
1430: LIST
1431: PUSH
1432: LD_OWVAR 67
1436: ARRAY
1437: ST_TO_ADDR
// repeat begin uc_side = 1 ;
1438: LD_ADDR_OWVAR 20
1442: PUSH
1443: LD_INT 1
1445: ST_TO_ADDR
// uc_nation = 1 ;
1446: LD_ADDR_OWVAR 21
1450: PUSH
1451: LD_INT 1
1453: ST_TO_ADDR
// hc_gallery =  ;
1454: LD_ADDR_OWVAR 33
1458: PUSH
1459: LD_STRING 
1461: ST_TO_ADDR
// hc_name =  ;
1462: LD_ADDR_OWVAR 26
1466: PUSH
1467: LD_STRING 
1469: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
1470: LD_ADDR_OWVAR 29
1474: PUSH
1475: LD_INT 9
1477: PPUSH
1478: LD_INT 11
1480: PPUSH
1481: CALL_OW 12
1485: PUSH
1486: LD_INT 10
1488: PPUSH
1489: LD_INT 12
1491: PPUSH
1492: CALL_OW 12
1496: PUSH
1497: EMPTY
1498: LIST
1499: LIST
1500: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Rand ( 1 , 2 ) , Level ] ;
1501: LD_ADDR_OWVAR 31
1505: PUSH
1506: LD_INT 0
1508: PPUSH
1509: LD_INT 3
1511: PPUSH
1512: CALL_OW 12
1516: PUSH
1517: LD_INT 0
1519: PPUSH
1520: LD_INT 1
1522: PPUSH
1523: CALL_OW 12
1527: PUSH
1528: LD_INT 1
1530: PPUSH
1531: LD_INT 2
1533: PPUSH
1534: CALL_OW 12
1538: PUSH
1539: LD_VAR 0 10
1543: PUSH
1544: EMPTY
1545: LIST
1546: LIST
1547: LIST
1548: LIST
1549: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
1550: LD_ADDR_OWVAR 27
1554: PUSH
1555: LD_INT 1
1557: PPUSH
1558: LD_INT 2
1560: PPUSH
1561: CALL_OW 12
1565: ST_TO_ADDR
// hc_class = 4 ;
1566: LD_ADDR_OWVAR 28
1570: PUSH
1571: LD_INT 4
1573: ST_TO_ADDR
// un = CreateHuman ;
1574: LD_ADDR_VAR 0 4
1578: PUSH
1579: CALL_OW 44
1583: ST_TO_ADDR
// PlaceHumanInUnit ( un , lab1 ) ;
1584: LD_VAR 0 4
1588: PPUSH
1589: LD_INT 278
1591: PPUSH
1592: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
1596: LD_ADDR_EXP 8
1600: PUSH
1601: LD_EXP 8
1605: PUSH
1606: LD_VAR 0 4
1610: ADD
1611: ST_TO_ADDR
// l = l + 1 ;
1612: LD_ADDR_VAR 0 9
1616: PUSH
1617: LD_VAR 0 9
1621: PUSH
1622: LD_INT 1
1624: PLUS
1625: ST_TO_ADDR
// end until l = 3 ;
1626: LD_VAR 0 9
1630: PUSH
1631: LD_INT 3
1633: EQUAL
1634: IFFALSE 1438
// end ; end ;
1636: GO 1387
1638: POP
1639: POP
// for i in lab2 do
1640: LD_ADDR_VAR 0 3
1644: PUSH
1645: LD_INT 283
1647: PUSH
1648: FOR_IN
1649: IFFALSE 1899
// begin ; l = 0 ;
1651: LD_ADDR_VAR 0 9
1655: PUSH
1656: LD_INT 0
1658: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
1659: LD_VAR 0 3
1663: PPUSH
1664: CALL_OW 310
1668: PUSH
1669: LD_INT 0
1671: EQUAL
1672: IFFALSE 1897
// begin Level = [ 4 , 4 , 4 ] [ Difficulty ] ;
1674: LD_ADDR_VAR 0 10
1678: PUSH
1679: LD_INT 4
1681: PUSH
1682: LD_INT 4
1684: PUSH
1685: LD_INT 4
1687: PUSH
1688: EMPTY
1689: LIST
1690: LIST
1691: LIST
1692: PUSH
1693: LD_OWVAR 67
1697: ARRAY
1698: ST_TO_ADDR
// repeat begin uc_side = 1 ;
1699: LD_ADDR_OWVAR 20
1703: PUSH
1704: LD_INT 1
1706: ST_TO_ADDR
// uc_nation = 1 ;
1707: LD_ADDR_OWVAR 21
1711: PUSH
1712: LD_INT 1
1714: ST_TO_ADDR
// hc_gallery =  ;
1715: LD_ADDR_OWVAR 33
1719: PUSH
1720: LD_STRING 
1722: ST_TO_ADDR
// hc_name =  ;
1723: LD_ADDR_OWVAR 26
1727: PUSH
1728: LD_STRING 
1730: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
1731: LD_ADDR_OWVAR 29
1735: PUSH
1736: LD_INT 9
1738: PPUSH
1739: LD_INT 11
1741: PPUSH
1742: CALL_OW 12
1746: PUSH
1747: LD_INT 10
1749: PPUSH
1750: LD_INT 12
1752: PPUSH
1753: CALL_OW 12
1757: PUSH
1758: EMPTY
1759: LIST
1760: LIST
1761: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Rand ( 0 , 2 ) , Level ] ;
1762: LD_ADDR_OWVAR 31
1766: PUSH
1767: LD_INT 0
1769: PPUSH
1770: LD_INT 3
1772: PPUSH
1773: CALL_OW 12
1777: PUSH
1778: LD_INT 0
1780: PPUSH
1781: LD_INT 1
1783: PPUSH
1784: CALL_OW 12
1788: PUSH
1789: LD_INT 0
1791: PPUSH
1792: LD_INT 2
1794: PPUSH
1795: CALL_OW 12
1799: PUSH
1800: LD_VAR 0 10
1804: PUSH
1805: EMPTY
1806: LIST
1807: LIST
1808: LIST
1809: LIST
1810: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
1811: LD_ADDR_OWVAR 27
1815: PUSH
1816: LD_INT 1
1818: PPUSH
1819: LD_INT 2
1821: PPUSH
1822: CALL_OW 12
1826: ST_TO_ADDR
// hc_class = 4 ;
1827: LD_ADDR_OWVAR 28
1831: PUSH
1832: LD_INT 4
1834: ST_TO_ADDR
// un = CreateHuman ;
1835: LD_ADDR_VAR 0 4
1839: PUSH
1840: CALL_OW 44
1844: ST_TO_ADDR
// PlaceHumanInUnit ( un , lab2 ) ;
1845: LD_VAR 0 4
1849: PPUSH
1850: LD_INT 283
1852: PPUSH
1853: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
1857: LD_ADDR_EXP 8
1861: PUSH
1862: LD_EXP 8
1866: PUSH
1867: LD_VAR 0 4
1871: ADD
1872: ST_TO_ADDR
// l = l + 1 ;
1873: LD_ADDR_VAR 0 9
1877: PUSH
1878: LD_VAR 0 9
1882: PUSH
1883: LD_INT 1
1885: PLUS
1886: ST_TO_ADDR
// end until l = 1 ;
1887: LD_VAR 0 9
1891: PUSH
1892: LD_INT 1
1894: EQUAL
1895: IFFALSE 1699
// end ; end ;
1897: GO 1648
1899: POP
1900: POP
// for i in lab3 do
1901: LD_ADDR_VAR 0 3
1905: PUSH
1906: LD_INT 381
1908: PUSH
1909: FOR_IN
1910: IFFALSE 2160
// begin l = 0 ;
1912: LD_ADDR_VAR 0 9
1916: PUSH
1917: LD_INT 0
1919: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
1920: LD_VAR 0 3
1924: PPUSH
1925: CALL_OW 310
1929: PUSH
1930: LD_INT 0
1932: EQUAL
1933: IFFALSE 2158
// begin Level = [ 3 , 3 , 3 ] [ Difficulty ] ;
1935: LD_ADDR_VAR 0 10
1939: PUSH
1940: LD_INT 3
1942: PUSH
1943: LD_INT 3
1945: PUSH
1946: LD_INT 3
1948: PUSH
1949: EMPTY
1950: LIST
1951: LIST
1952: LIST
1953: PUSH
1954: LD_OWVAR 67
1958: ARRAY
1959: ST_TO_ADDR
// repeat begin uc_side = 4 ;
1960: LD_ADDR_OWVAR 20
1964: PUSH
1965: LD_INT 4
1967: ST_TO_ADDR
// uc_nation = 1 ;
1968: LD_ADDR_OWVAR 21
1972: PUSH
1973: LD_INT 1
1975: ST_TO_ADDR
// hc_gallery =  ;
1976: LD_ADDR_OWVAR 33
1980: PUSH
1981: LD_STRING 
1983: ST_TO_ADDR
// hc_name =  ;
1984: LD_ADDR_OWVAR 26
1988: PUSH
1989: LD_STRING 
1991: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
1992: LD_ADDR_OWVAR 29
1996: PUSH
1997: LD_INT 9
1999: PPUSH
2000: LD_INT 11
2002: PPUSH
2003: CALL_OW 12
2007: PUSH
2008: LD_INT 10
2010: PPUSH
2011: LD_INT 12
2013: PPUSH
2014: CALL_OW 12
2018: PUSH
2019: EMPTY
2020: LIST
2021: LIST
2022: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Rand ( 0 , 2 ) , Level ] ;
2023: LD_ADDR_OWVAR 31
2027: PUSH
2028: LD_INT 0
2030: PPUSH
2031: LD_INT 3
2033: PPUSH
2034: CALL_OW 12
2038: PUSH
2039: LD_INT 0
2041: PPUSH
2042: LD_INT 1
2044: PPUSH
2045: CALL_OW 12
2049: PUSH
2050: LD_INT 0
2052: PPUSH
2053: LD_INT 2
2055: PPUSH
2056: CALL_OW 12
2060: PUSH
2061: LD_VAR 0 10
2065: PUSH
2066: EMPTY
2067: LIST
2068: LIST
2069: LIST
2070: LIST
2071: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
2072: LD_ADDR_OWVAR 27
2076: PUSH
2077: LD_INT 1
2079: PPUSH
2080: LD_INT 2
2082: PPUSH
2083: CALL_OW 12
2087: ST_TO_ADDR
// hc_class = 4 ;
2088: LD_ADDR_OWVAR 28
2092: PUSH
2093: LD_INT 4
2095: ST_TO_ADDR
// un = CreateHuman ;
2096: LD_ADDR_VAR 0 4
2100: PUSH
2101: CALL_OW 44
2105: ST_TO_ADDR
// PlaceHumanInUnit ( un , lab3 ) ;
2106: LD_VAR 0 4
2110: PPUSH
2111: LD_INT 381
2113: PPUSH
2114: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
2118: LD_ADDR_EXP 8
2122: PUSH
2123: LD_EXP 8
2127: PUSH
2128: LD_VAR 0 4
2132: ADD
2133: ST_TO_ADDR
// l = l + 1 ;
2134: LD_ADDR_VAR 0 9
2138: PUSH
2139: LD_VAR 0 9
2143: PUSH
2144: LD_INT 1
2146: PLUS
2147: ST_TO_ADDR
// end until l = 2 ;
2148: LD_VAR 0 9
2152: PUSH
2153: LD_INT 2
2155: EQUAL
2156: IFFALSE 1960
// end ; end ;
2158: GO 1909
2160: POP
2161: POP
// for i in lab4 do
2162: LD_ADDR_VAR 0 3
2166: PUSH
2167: LD_INT 388
2169: PUSH
2170: FOR_IN
2171: IFFALSE 2421
// begin l = 0 ;
2173: LD_ADDR_VAR 0 9
2177: PUSH
2178: LD_INT 0
2180: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
2181: LD_VAR 0 3
2185: PPUSH
2186: CALL_OW 310
2190: PUSH
2191: LD_INT 0
2193: EQUAL
2194: IFFALSE 2419
// begin Level = [ 4 , 4 , 4 ] [ Difficulty ] ;
2196: LD_ADDR_VAR 0 10
2200: PUSH
2201: LD_INT 4
2203: PUSH
2204: LD_INT 4
2206: PUSH
2207: LD_INT 4
2209: PUSH
2210: EMPTY
2211: LIST
2212: LIST
2213: LIST
2214: PUSH
2215: LD_OWVAR 67
2219: ARRAY
2220: ST_TO_ADDR
// repeat begin uc_side = 4 ;
2221: LD_ADDR_OWVAR 20
2225: PUSH
2226: LD_INT 4
2228: ST_TO_ADDR
// uc_nation = 1 ;
2229: LD_ADDR_OWVAR 21
2233: PUSH
2234: LD_INT 1
2236: ST_TO_ADDR
// hc_gallery =  ;
2237: LD_ADDR_OWVAR 33
2241: PUSH
2242: LD_STRING 
2244: ST_TO_ADDR
// hc_name =  ;
2245: LD_ADDR_OWVAR 26
2249: PUSH
2250: LD_STRING 
2252: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
2253: LD_ADDR_OWVAR 29
2257: PUSH
2258: LD_INT 9
2260: PPUSH
2261: LD_INT 11
2263: PPUSH
2264: CALL_OW 12
2268: PUSH
2269: LD_INT 10
2271: PPUSH
2272: LD_INT 12
2274: PPUSH
2275: CALL_OW 12
2279: PUSH
2280: EMPTY
2281: LIST
2282: LIST
2283: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Rand ( 0 , 2 ) , Level ] ;
2284: LD_ADDR_OWVAR 31
2288: PUSH
2289: LD_INT 0
2291: PPUSH
2292: LD_INT 3
2294: PPUSH
2295: CALL_OW 12
2299: PUSH
2300: LD_INT 0
2302: PPUSH
2303: LD_INT 1
2305: PPUSH
2306: CALL_OW 12
2310: PUSH
2311: LD_INT 0
2313: PPUSH
2314: LD_INT 2
2316: PPUSH
2317: CALL_OW 12
2321: PUSH
2322: LD_VAR 0 10
2326: PUSH
2327: EMPTY
2328: LIST
2329: LIST
2330: LIST
2331: LIST
2332: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
2333: LD_ADDR_OWVAR 27
2337: PUSH
2338: LD_INT 1
2340: PPUSH
2341: LD_INT 2
2343: PPUSH
2344: CALL_OW 12
2348: ST_TO_ADDR
// hc_class = 4 ;
2349: LD_ADDR_OWVAR 28
2353: PUSH
2354: LD_INT 4
2356: ST_TO_ADDR
// un = CreateHuman ;
2357: LD_ADDR_VAR 0 4
2361: PUSH
2362: CALL_OW 44
2366: ST_TO_ADDR
// PlaceHumanInUnit ( un , lab4 ) ;
2367: LD_VAR 0 4
2371: PPUSH
2372: LD_INT 388
2374: PPUSH
2375: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
2379: LD_ADDR_EXP 8
2383: PUSH
2384: LD_EXP 8
2388: PUSH
2389: LD_VAR 0 4
2393: ADD
2394: ST_TO_ADDR
// l = l + 1 ;
2395: LD_ADDR_VAR 0 9
2399: PUSH
2400: LD_VAR 0 9
2404: PUSH
2405: LD_INT 1
2407: PLUS
2408: ST_TO_ADDR
// end until l = 2 ;
2409: LD_VAR 0 9
2413: PUSH
2414: LD_INT 2
2416: EQUAL
2417: IFFALSE 2221
// end ; end ;
2419: GO 2170
2421: POP
2422: POP
// for i in kosze1 do
2423: LD_ADDR_VAR 0 3
2427: PUSH
2428: LD_INT 306
2430: PUSH
2431: FOR_IN
2432: IFFALSE 2682
// begin l = 0 ;
2434: LD_ADDR_VAR 0 9
2438: PUSH
2439: LD_INT 0
2441: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
2442: LD_VAR 0 3
2446: PPUSH
2447: CALL_OW 310
2451: PUSH
2452: LD_INT 0
2454: EQUAL
2455: IFFALSE 2680
// begin Level = [ 4 , 4 , 4 ] [ Difficulty ] ;
2457: LD_ADDR_VAR 0 10
2461: PUSH
2462: LD_INT 4
2464: PUSH
2465: LD_INT 4
2467: PUSH
2468: LD_INT 4
2470: PUSH
2471: EMPTY
2472: LIST
2473: LIST
2474: LIST
2475: PUSH
2476: LD_OWVAR 67
2480: ARRAY
2481: ST_TO_ADDR
// repeat begin uc_side = 4 ;
2482: LD_ADDR_OWVAR 20
2486: PUSH
2487: LD_INT 4
2489: ST_TO_ADDR
// uc_nation = 1 ;
2490: LD_ADDR_OWVAR 21
2494: PUSH
2495: LD_INT 1
2497: ST_TO_ADDR
// hc_gallery =  ;
2498: LD_ADDR_OWVAR 33
2502: PUSH
2503: LD_STRING 
2505: ST_TO_ADDR
// hc_name =  ;
2506: LD_ADDR_OWVAR 26
2510: PUSH
2511: LD_STRING 
2513: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
2514: LD_ADDR_OWVAR 29
2518: PUSH
2519: LD_INT 9
2521: PPUSH
2522: LD_INT 11
2524: PPUSH
2525: CALL_OW 12
2529: PUSH
2530: LD_INT 10
2532: PPUSH
2533: LD_INT 12
2535: PPUSH
2536: CALL_OW 12
2540: PUSH
2541: EMPTY
2542: LIST
2543: LIST
2544: ST_TO_ADDR
// hc_skills = [ Level , Rand ( 0 , 1 ) , Rand ( 0 , 2 ) , Rand ( 0 , 1 ) ] ;
2545: LD_ADDR_OWVAR 31
2549: PUSH
2550: LD_VAR 0 10
2554: PUSH
2555: LD_INT 0
2557: PPUSH
2558: LD_INT 1
2560: PPUSH
2561: CALL_OW 12
2565: PUSH
2566: LD_INT 0
2568: PPUSH
2569: LD_INT 2
2571: PPUSH
2572: CALL_OW 12
2576: PUSH
2577: LD_INT 0
2579: PPUSH
2580: LD_INT 1
2582: PPUSH
2583: CALL_OW 12
2587: PUSH
2588: EMPTY
2589: LIST
2590: LIST
2591: LIST
2592: LIST
2593: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
2594: LD_ADDR_OWVAR 27
2598: PUSH
2599: LD_INT 1
2601: PPUSH
2602: LD_INT 2
2604: PPUSH
2605: CALL_OW 12
2609: ST_TO_ADDR
// hc_class = 1 ;
2610: LD_ADDR_OWVAR 28
2614: PUSH
2615: LD_INT 1
2617: ST_TO_ADDR
// un = CreateHuman ;
2618: LD_ADDR_VAR 0 4
2622: PUSH
2623: CALL_OW 44
2627: ST_TO_ADDR
// PlaceHumanInUnit ( un , kosze1 ) ;
2628: LD_VAR 0 4
2632: PPUSH
2633: LD_INT 306
2635: PPUSH
2636: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
2640: LD_ADDR_EXP 8
2644: PUSH
2645: LD_EXP 8
2649: PUSH
2650: LD_VAR 0 4
2654: ADD
2655: ST_TO_ADDR
// l = l + 1 ;
2656: LD_ADDR_VAR 0 9
2660: PUSH
2661: LD_VAR 0 9
2665: PUSH
2666: LD_INT 1
2668: PLUS
2669: ST_TO_ADDR
// end until l = 3 ;
2670: LD_VAR 0 9
2674: PUSH
2675: LD_INT 3
2677: EQUAL
2678: IFFALSE 2482
// end ; end ;
2680: GO 2431
2682: POP
2683: POP
// for i in kosze2 do
2684: LD_ADDR_VAR 0 3
2688: PUSH
2689: LD_INT 270
2691: PUSH
2692: FOR_IN
2693: IFFALSE 2943
// begin l = 0 ;
2695: LD_ADDR_VAR 0 9
2699: PUSH
2700: LD_INT 0
2702: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
2703: LD_VAR 0 3
2707: PPUSH
2708: CALL_OW 310
2712: PUSH
2713: LD_INT 0
2715: EQUAL
2716: IFFALSE 2941
// begin Level = [ 4 , 4 , 4 ] [ Difficulty ] ;
2718: LD_ADDR_VAR 0 10
2722: PUSH
2723: LD_INT 4
2725: PUSH
2726: LD_INT 4
2728: PUSH
2729: LD_INT 4
2731: PUSH
2732: EMPTY
2733: LIST
2734: LIST
2735: LIST
2736: PUSH
2737: LD_OWVAR 67
2741: ARRAY
2742: ST_TO_ADDR
// repeat begin uc_side = 1 ;
2743: LD_ADDR_OWVAR 20
2747: PUSH
2748: LD_INT 1
2750: ST_TO_ADDR
// uc_nation = 1 ;
2751: LD_ADDR_OWVAR 21
2755: PUSH
2756: LD_INT 1
2758: ST_TO_ADDR
// hc_gallery =  ;
2759: LD_ADDR_OWVAR 33
2763: PUSH
2764: LD_STRING 
2766: ST_TO_ADDR
// hc_name =  ;
2767: LD_ADDR_OWVAR 26
2771: PUSH
2772: LD_STRING 
2774: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
2775: LD_ADDR_OWVAR 29
2779: PUSH
2780: LD_INT 9
2782: PPUSH
2783: LD_INT 11
2785: PPUSH
2786: CALL_OW 12
2790: PUSH
2791: LD_INT 10
2793: PPUSH
2794: LD_INT 12
2796: PPUSH
2797: CALL_OW 12
2801: PUSH
2802: EMPTY
2803: LIST
2804: LIST
2805: ST_TO_ADDR
// hc_skills = [ Level , Rand ( 0 , 1 ) , Rand ( 0 , 2 ) , Rand ( 0 , 1 ) ] ;
2806: LD_ADDR_OWVAR 31
2810: PUSH
2811: LD_VAR 0 10
2815: PUSH
2816: LD_INT 0
2818: PPUSH
2819: LD_INT 1
2821: PPUSH
2822: CALL_OW 12
2826: PUSH
2827: LD_INT 0
2829: PPUSH
2830: LD_INT 2
2832: PPUSH
2833: CALL_OW 12
2837: PUSH
2838: LD_INT 0
2840: PPUSH
2841: LD_INT 1
2843: PPUSH
2844: CALL_OW 12
2848: PUSH
2849: EMPTY
2850: LIST
2851: LIST
2852: LIST
2853: LIST
2854: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
2855: LD_ADDR_OWVAR 27
2859: PUSH
2860: LD_INT 1
2862: PPUSH
2863: LD_INT 2
2865: PPUSH
2866: CALL_OW 12
2870: ST_TO_ADDR
// hc_class = 1 ;
2871: LD_ADDR_OWVAR 28
2875: PUSH
2876: LD_INT 1
2878: ST_TO_ADDR
// un = CreateHuman ;
2879: LD_ADDR_VAR 0 4
2883: PUSH
2884: CALL_OW 44
2888: ST_TO_ADDR
// PlaceHumanInUnit ( un , kosze2 ) ;
2889: LD_VAR 0 4
2893: PPUSH
2894: LD_INT 270
2896: PPUSH
2897: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
2901: LD_ADDR_EXP 8
2905: PUSH
2906: LD_EXP 8
2910: PUSH
2911: LD_VAR 0 4
2915: ADD
2916: ST_TO_ADDR
// l = l + 1 ;
2917: LD_ADDR_VAR 0 9
2921: PUSH
2922: LD_VAR 0 9
2926: PUSH
2927: LD_INT 1
2929: PLUS
2930: ST_TO_ADDR
// end until l = 3 ;
2931: LD_VAR 0 9
2935: PUSH
2936: LD_INT 3
2938: EQUAL
2939: IFFALSE 2743
// end ; end ;
2941: GO 2692
2943: POP
2944: POP
// for i in sklad1 do
2945: LD_ADDR_VAR 0 3
2949: PUSH
2950: LD_INT 305
2952: PUSH
2953: FOR_IN
2954: IFFALSE 3204
// begin l = 0 ;
2956: LD_ADDR_VAR 0 9
2960: PUSH
2961: LD_INT 0
2963: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
2964: LD_VAR 0 3
2968: PPUSH
2969: CALL_OW 310
2973: PUSH
2974: LD_INT 0
2976: EQUAL
2977: IFFALSE 3202
// begin Level = [ 6 , 6 , 6 ] [ Difficulty ] ;
2979: LD_ADDR_VAR 0 10
2983: PUSH
2984: LD_INT 6
2986: PUSH
2987: LD_INT 6
2989: PUSH
2990: LD_INT 6
2992: PUSH
2993: EMPTY
2994: LIST
2995: LIST
2996: LIST
2997: PUSH
2998: LD_OWVAR 67
3002: ARRAY
3003: ST_TO_ADDR
// repeat begin uc_side = 4 ;
3004: LD_ADDR_OWVAR 20
3008: PUSH
3009: LD_INT 4
3011: ST_TO_ADDR
// uc_nation = 1 ;
3012: LD_ADDR_OWVAR 21
3016: PUSH
3017: LD_INT 1
3019: ST_TO_ADDR
// hc_gallery =  ;
3020: LD_ADDR_OWVAR 33
3024: PUSH
3025: LD_STRING 
3027: ST_TO_ADDR
// hc_name =  ;
3028: LD_ADDR_OWVAR 26
3032: PUSH
3033: LD_STRING 
3035: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
3036: LD_ADDR_OWVAR 29
3040: PUSH
3041: LD_INT 9
3043: PPUSH
3044: LD_INT 11
3046: PPUSH
3047: CALL_OW 12
3051: PUSH
3052: LD_INT 10
3054: PPUSH
3055: LD_INT 12
3057: PPUSH
3058: CALL_OW 12
3062: PUSH
3063: EMPTY
3064: LIST
3065: LIST
3066: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 2 ) , Level , Rand ( 0 , 2 ) , Rand ( 0 , 1 ) ] ;
3067: LD_ADDR_OWVAR 31
3071: PUSH
3072: LD_INT 0
3074: PPUSH
3075: LD_INT 2
3077: PPUSH
3078: CALL_OW 12
3082: PUSH
3083: LD_VAR 0 10
3087: PUSH
3088: LD_INT 0
3090: PPUSH
3091: LD_INT 2
3093: PPUSH
3094: CALL_OW 12
3098: PUSH
3099: LD_INT 0
3101: PPUSH
3102: LD_INT 1
3104: PPUSH
3105: CALL_OW 12
3109: PUSH
3110: EMPTY
3111: LIST
3112: LIST
3113: LIST
3114: LIST
3115: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
3116: LD_ADDR_OWVAR 27
3120: PUSH
3121: LD_INT 1
3123: PPUSH
3124: LD_INT 2
3126: PPUSH
3127: CALL_OW 12
3131: ST_TO_ADDR
// hc_class = 2 ;
3132: LD_ADDR_OWVAR 28
3136: PUSH
3137: LD_INT 2
3139: ST_TO_ADDR
// un = CreateHuman ;
3140: LD_ADDR_VAR 0 4
3144: PUSH
3145: CALL_OW 44
3149: ST_TO_ADDR
// PlaceHumanInUnit ( un , sklad1 ) ;
3150: LD_VAR 0 4
3154: PPUSH
3155: LD_INT 305
3157: PPUSH
3158: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
3162: LD_ADDR_EXP 8
3166: PUSH
3167: LD_EXP 8
3171: PUSH
3172: LD_VAR 0 4
3176: ADD
3177: ST_TO_ADDR
// l = l + 1 ;
3178: LD_ADDR_VAR 0 9
3182: PUSH
3183: LD_VAR 0 9
3187: PUSH
3188: LD_INT 1
3190: PLUS
3191: ST_TO_ADDR
// end until l = 2 ;
3192: LD_VAR 0 9
3196: PUSH
3197: LD_INT 2
3199: EQUAL
3200: IFFALSE 3004
// end ; end ;
3202: GO 2953
3204: POP
3205: POP
// for i in sklad2 do
3206: LD_ADDR_VAR 0 3
3210: PUSH
3211: LD_INT 218
3213: PUSH
3214: FOR_IN
3215: IFFALSE 3465
// begin l = 0 ;
3217: LD_ADDR_VAR 0 9
3221: PUSH
3222: LD_INT 0
3224: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
3225: LD_VAR 0 3
3229: PPUSH
3230: CALL_OW 310
3234: PUSH
3235: LD_INT 0
3237: EQUAL
3238: IFFALSE 3463
// begin Level = [ 6 , 6 , 6 ] [ Difficulty ] ;
3240: LD_ADDR_VAR 0 10
3244: PUSH
3245: LD_INT 6
3247: PUSH
3248: LD_INT 6
3250: PUSH
3251: LD_INT 6
3253: PUSH
3254: EMPTY
3255: LIST
3256: LIST
3257: LIST
3258: PUSH
3259: LD_OWVAR 67
3263: ARRAY
3264: ST_TO_ADDR
// repeat begin uc_side = 1 ;
3265: LD_ADDR_OWVAR 20
3269: PUSH
3270: LD_INT 1
3272: ST_TO_ADDR
// uc_nation = 1 ;
3273: LD_ADDR_OWVAR 21
3277: PUSH
3278: LD_INT 1
3280: ST_TO_ADDR
// hc_gallery =  ;
3281: LD_ADDR_OWVAR 33
3285: PUSH
3286: LD_STRING 
3288: ST_TO_ADDR
// hc_name =  ;
3289: LD_ADDR_OWVAR 26
3293: PUSH
3294: LD_STRING 
3296: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
3297: LD_ADDR_OWVAR 29
3301: PUSH
3302: LD_INT 9
3304: PPUSH
3305: LD_INT 11
3307: PPUSH
3308: CALL_OW 12
3312: PUSH
3313: LD_INT 10
3315: PPUSH
3316: LD_INT 12
3318: PPUSH
3319: CALL_OW 12
3323: PUSH
3324: EMPTY
3325: LIST
3326: LIST
3327: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 1 ) , Level , Rand ( 0 , 2 ) , Rand ( 0 , 1 ) ] ;
3328: LD_ADDR_OWVAR 31
3332: PUSH
3333: LD_INT 0
3335: PPUSH
3336: LD_INT 1
3338: PPUSH
3339: CALL_OW 12
3343: PUSH
3344: LD_VAR 0 10
3348: PUSH
3349: LD_INT 0
3351: PPUSH
3352: LD_INT 2
3354: PPUSH
3355: CALL_OW 12
3359: PUSH
3360: LD_INT 0
3362: PPUSH
3363: LD_INT 1
3365: PPUSH
3366: CALL_OW 12
3370: PUSH
3371: EMPTY
3372: LIST
3373: LIST
3374: LIST
3375: LIST
3376: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
3377: LD_ADDR_OWVAR 27
3381: PUSH
3382: LD_INT 1
3384: PPUSH
3385: LD_INT 2
3387: PPUSH
3388: CALL_OW 12
3392: ST_TO_ADDR
// hc_class = 2 ;
3393: LD_ADDR_OWVAR 28
3397: PUSH
3398: LD_INT 2
3400: ST_TO_ADDR
// un = CreateHuman ;
3401: LD_ADDR_VAR 0 4
3405: PUSH
3406: CALL_OW 44
3410: ST_TO_ADDR
// PlaceHumanInUnit ( un , sklad2 ) ;
3411: LD_VAR 0 4
3415: PPUSH
3416: LD_INT 218
3418: PPUSH
3419: CALL_OW 52
// AmericanPerson = AmericanPerson ^ un ;
3423: LD_ADDR_EXP 8
3427: PUSH
3428: LD_EXP 8
3432: PUSH
3433: LD_VAR 0 4
3437: ADD
3438: ST_TO_ADDR
// l = l + 1 ;
3439: LD_ADDR_VAR 0 9
3443: PUSH
3444: LD_VAR 0 9
3448: PUSH
3449: LD_INT 1
3451: PLUS
3452: ST_TO_ADDR
// end until l = 2 ;
3453: LD_VAR 0 9
3457: PUSH
3458: LD_INT 2
3460: EQUAL
3461: IFFALSE 3265
// end ; end ;
3463: GO 3214
3465: POP
3466: POP
// end ; end_of_file
3467: LD_VAR 0 1
3471: RET
// export OWChyba , Nefarem ; export function PrepareHero1 ; begin
3472: LD_INT 0
3474: PPUSH
// uc_side = 4 ;
3475: LD_ADDR_OWVAR 20
3479: PUSH
3480: LD_INT 4
3482: ST_TO_ADDR
// uc_nation = 1 ;
3483: LD_ADDR_OWVAR 21
3487: PUSH
3488: LD_INT 1
3490: ST_TO_ADDR
// OWCHyba := CreateCharacter ( OWChyba ) ;
3491: LD_ADDR_EXP 11
3495: PUSH
3496: LD_STRING OWChyba
3498: PPUSH
3499: CALL_OW 34
3503: ST_TO_ADDR
// PlaceUnitArea ( OWChyba , JA , false ) ;
3504: LD_EXP 11
3508: PPUSH
3509: LD_INT 3
3511: PPUSH
3512: LD_INT 0
3514: PPUSH
3515: CALL_OW 49
// uc_side = 1 ;
3519: LD_ADDR_OWVAR 20
3523: PUSH
3524: LD_INT 1
3526: ST_TO_ADDR
// uc_nation = 1 ;
3527: LD_ADDR_OWVAR 21
3531: PUSH
3532: LD_INT 1
3534: ST_TO_ADDR
// Nefarem := CreateCharacter ( Nefarem ) end ; end_of_file
3535: LD_ADDR_EXP 12
3539: PUSH
3540: LD_STRING Nefarem
3542: PPUSH
3543: CALL_OW 34
3547: ST_TO_ADDR
3548: LD_VAR 0 1
3552: RET
// export q1 , q2 , q3 , t1 , t2 , t3 , R1 , R2 , R3 , V1 , V2 , V3 , C1 , C2 , C3 , X1 , X2 , X3 ; export function Arabian_left ; begin
3553: LD_INT 0
3555: PPUSH
// ; vc_chassis = 14 ;
3556: LD_ADDR_OWVAR 37
3560: PUSH
3561: LD_INT 14
3563: ST_TO_ADDR
// vc_engine = engine_combustion ;
3564: LD_ADDR_OWVAR 39
3568: PUSH
3569: LD_INT 1
3571: ST_TO_ADDR
// vc_control = control_manual ;
3572: LD_ADDR_OWVAR 38
3576: PUSH
3577: LD_INT 1
3579: ST_TO_ADDR
// vc_weapon = 27 ;
3580: LD_ADDR_OWVAR 40
3584: PUSH
3585: LD_INT 27
3587: ST_TO_ADDR
// uc_side = 2 ;
3588: LD_ADDR_OWVAR 20
3592: PUSH
3593: LD_INT 2
3595: ST_TO_ADDR
// t1 = CreateVehicle ;
3596: LD_ADDR_EXP 16
3600: PUSH
3601: CALL_OW 45
3605: ST_TO_ADDR
// t2 = CreateVehicle ;
3606: LD_ADDR_EXP 17
3610: PUSH
3611: CALL_OW 45
3615: ST_TO_ADDR
// t3 = CreateVehicle ;
3616: LD_ADDR_EXP 18
3620: PUSH
3621: CALL_OW 45
3625: ST_TO_ADDR
// hc_class = 3 ;
3626: LD_ADDR_OWVAR 28
3630: PUSH
3631: LD_INT 3
3633: ST_TO_ADDR
// uc_nation = nation_Arabian ;
3634: LD_ADDR_OWVAR 21
3638: PUSH
3639: LD_INT 2
3641: ST_TO_ADDR
// hc_name =  ;
3642: LD_ADDR_OWVAR 26
3646: PUSH
3647: LD_STRING 
3649: ST_TO_ADDR
// uc_side = 2 ;
3650: LD_ADDR_OWVAR 20
3654: PUSH
3655: LD_INT 2
3657: ST_TO_ADDR
// hc_gallery =  ;
3658: LD_ADDR_OWVAR 33
3662: PUSH
3663: LD_STRING 
3665: ST_TO_ADDR
// hc_sex = sex_male ;
3666: LD_ADDR_OWVAR 27
3670: PUSH
3671: LD_INT 1
3673: ST_TO_ADDR
// hc_skills = [ 3 , 3 , 10 , 3 ] ;
3674: LD_ADDR_OWVAR 31
3678: PUSH
3679: LD_INT 3
3681: PUSH
3682: LD_INT 3
3684: PUSH
3685: LD_INT 10
3687: PUSH
3688: LD_INT 3
3690: PUSH
3691: EMPTY
3692: LIST
3693: LIST
3694: LIST
3695: LIST
3696: ST_TO_ADDR
// q1 = CreateHuman ;
3697: LD_ADDR_EXP 13
3701: PUSH
3702: CALL_OW 44
3706: ST_TO_ADDR
// q2 = CreateHuman ;
3707: LD_ADDR_EXP 14
3711: PUSH
3712: CALL_OW 44
3716: ST_TO_ADDR
// q3 = CreateHuman ;
3717: LD_ADDR_EXP 15
3721: PUSH
3722: CALL_OW 44
3726: ST_TO_ADDR
// PlaceHumanInUnit ( q1 , t1 ) ;
3727: LD_EXP 13
3731: PPUSH
3732: LD_EXP 16
3736: PPUSH
3737: CALL_OW 52
// PlaceHumanInUnit ( q2 , t2 ) ;
3741: LD_EXP 14
3745: PPUSH
3746: LD_EXP 17
3750: PPUSH
3751: CALL_OW 52
// PlaceHumanInUnit ( q3 , t3 ) ;
3755: LD_EXP 15
3759: PPUSH
3760: LD_EXP 18
3764: PPUSH
3765: CALL_OW 52
// PlaceUnitArea ( t1 , ATAK_LEWA , false ) ;
3769: LD_EXP 16
3773: PPUSH
3774: LD_INT 7
3776: PPUSH
3777: LD_INT 0
3779: PPUSH
3780: CALL_OW 49
// PlaceUnitArea ( t2 , ATAK_LEWA , false ) ;
3784: LD_EXP 17
3788: PPUSH
3789: LD_INT 7
3791: PPUSH
3792: LD_INT 0
3794: PPUSH
3795: CALL_OW 49
// PlaceUnitArea ( t3 , ATAK_LEWA , false ) ;
3799: LD_EXP 18
3803: PPUSH
3804: LD_INT 7
3806: PPUSH
3807: LD_INT 0
3809: PPUSH
3810: CALL_OW 49
// vc_chassis = 14 ;
3814: LD_ADDR_OWVAR 37
3818: PUSH
3819: LD_INT 14
3821: ST_TO_ADDR
// vc_engine = engine_combustion ;
3822: LD_ADDR_OWVAR 39
3826: PUSH
3827: LD_INT 1
3829: ST_TO_ADDR
// vc_control = control_manual ;
3830: LD_ADDR_OWVAR 38
3834: PUSH
3835: LD_INT 1
3837: ST_TO_ADDR
// vc_weapon = 28 ;
3838: LD_ADDR_OWVAR 40
3842: PUSH
3843: LD_INT 28
3845: ST_TO_ADDR
// uc_side = 2 ;
3846: LD_ADDR_OWVAR 20
3850: PUSH
3851: LD_INT 2
3853: ST_TO_ADDR
// R1 = CreateVehicle ;
3854: LD_ADDR_EXP 19
3858: PUSH
3859: CALL_OW 45
3863: ST_TO_ADDR
// R2 = CreateVehicle ;
3864: LD_ADDR_EXP 20
3868: PUSH
3869: CALL_OW 45
3873: ST_TO_ADDR
// R3 = CreateVehicle ;
3874: LD_ADDR_EXP 21
3878: PUSH
3879: CALL_OW 45
3883: ST_TO_ADDR
// hc_class = 3 ;
3884: LD_ADDR_OWVAR 28
3888: PUSH
3889: LD_INT 3
3891: ST_TO_ADDR
// uc_nation = nation_Arabian ;
3892: LD_ADDR_OWVAR 21
3896: PUSH
3897: LD_INT 2
3899: ST_TO_ADDR
// hc_name =  ;
3900: LD_ADDR_OWVAR 26
3904: PUSH
3905: LD_STRING 
3907: ST_TO_ADDR
// uc_side = 2 ;
3908: LD_ADDR_OWVAR 20
3912: PUSH
3913: LD_INT 2
3915: ST_TO_ADDR
// hc_gallery =  ;
3916: LD_ADDR_OWVAR 33
3920: PUSH
3921: LD_STRING 
3923: ST_TO_ADDR
// hc_sex = sex_male ;
3924: LD_ADDR_OWVAR 27
3928: PUSH
3929: LD_INT 1
3931: ST_TO_ADDR
// hc_skills = [ 3 , 3 , 10 , 3 ] ;
3932: LD_ADDR_OWVAR 31
3936: PUSH
3937: LD_INT 3
3939: PUSH
3940: LD_INT 3
3942: PUSH
3943: LD_INT 10
3945: PUSH
3946: LD_INT 3
3948: PUSH
3949: EMPTY
3950: LIST
3951: LIST
3952: LIST
3953: LIST
3954: ST_TO_ADDR
// V1 = CreateHuman ;
3955: LD_ADDR_EXP 22
3959: PUSH
3960: CALL_OW 44
3964: ST_TO_ADDR
// V2 = CreateHuman ;
3965: LD_ADDR_EXP 23
3969: PUSH
3970: CALL_OW 44
3974: ST_TO_ADDR
// V3 = CreateHuman ;
3975: LD_ADDR_EXP 24
3979: PUSH
3980: CALL_OW 44
3984: ST_TO_ADDR
// PlaceHumanInUnit ( V1 , R1 ) ;
3985: LD_EXP 22
3989: PPUSH
3990: LD_EXP 19
3994: PPUSH
3995: CALL_OW 52
// PlaceHumanInUnit ( V2 , R2 ) ;
3999: LD_EXP 23
4003: PPUSH
4004: LD_EXP 20
4008: PPUSH
4009: CALL_OW 52
// PlaceHumanInUnit ( V3 , R3 ) ;
4013: LD_EXP 24
4017: PPUSH
4018: LD_EXP 21
4022: PPUSH
4023: CALL_OW 52
// PlaceUnitArea ( R1 , ATAK_LEWA , false ) ;
4027: LD_EXP 19
4031: PPUSH
4032: LD_INT 7
4034: PPUSH
4035: LD_INT 0
4037: PPUSH
4038: CALL_OW 49
// PlaceUnitArea ( R2 , ATAK_LEWA , false ) ;
4042: LD_EXP 20
4046: PPUSH
4047: LD_INT 7
4049: PPUSH
4050: LD_INT 0
4052: PPUSH
4053: CALL_OW 49
// PlaceUnitArea ( R3 , ATAK_LEWA , false ) ;
4057: LD_EXP 21
4061: PPUSH
4062: LD_INT 7
4064: PPUSH
4065: LD_INT 0
4067: PPUSH
4068: CALL_OW 49
// vc_chassis = 14 ;
4072: LD_ADDR_OWVAR 37
4076: PUSH
4077: LD_INT 14
4079: ST_TO_ADDR
// vc_engine = engine_combustion ;
4080: LD_ADDR_OWVAR 39
4084: PUSH
4085: LD_INT 1
4087: ST_TO_ADDR
// vc_control = control_manual ;
4088: LD_ADDR_OWVAR 38
4092: PUSH
4093: LD_INT 1
4095: ST_TO_ADDR
// vc_weapon = 24 ;
4096: LD_ADDR_OWVAR 40
4100: PUSH
4101: LD_INT 24
4103: ST_TO_ADDR
// uc_side = 2 ;
4104: LD_ADDR_OWVAR 20
4108: PUSH
4109: LD_INT 2
4111: ST_TO_ADDR
// C1 = CreateVehicle ;
4112: LD_ADDR_EXP 25
4116: PUSH
4117: CALL_OW 45
4121: ST_TO_ADDR
// C2 = CreateVehicle ;
4122: LD_ADDR_EXP 26
4126: PUSH
4127: CALL_OW 45
4131: ST_TO_ADDR
// C3 = CreateVehicle ;
4132: LD_ADDR_EXP 27
4136: PUSH
4137: CALL_OW 45
4141: ST_TO_ADDR
// hc_class = 3 ;
4142: LD_ADDR_OWVAR 28
4146: PUSH
4147: LD_INT 3
4149: ST_TO_ADDR
// uc_nation = nation_Arabian ;
4150: LD_ADDR_OWVAR 21
4154: PUSH
4155: LD_INT 2
4157: ST_TO_ADDR
// hc_name =  ;
4158: LD_ADDR_OWVAR 26
4162: PUSH
4163: LD_STRING 
4165: ST_TO_ADDR
// uc_side = 2 ;
4166: LD_ADDR_OWVAR 20
4170: PUSH
4171: LD_INT 2
4173: ST_TO_ADDR
// hc_gallery =  ;
4174: LD_ADDR_OWVAR 33
4178: PUSH
4179: LD_STRING 
4181: ST_TO_ADDR
// hc_sex = sex_male ;
4182: LD_ADDR_OWVAR 27
4186: PUSH
4187: LD_INT 1
4189: ST_TO_ADDR
// hc_skills = [ 3 , 3 , 10 , 3 ] ;
4190: LD_ADDR_OWVAR 31
4194: PUSH
4195: LD_INT 3
4197: PUSH
4198: LD_INT 3
4200: PUSH
4201: LD_INT 10
4203: PUSH
4204: LD_INT 3
4206: PUSH
4207: EMPTY
4208: LIST
4209: LIST
4210: LIST
4211: LIST
4212: ST_TO_ADDR
// X1 = CreateHuman ;
4213: LD_ADDR_EXP 28
4217: PUSH
4218: CALL_OW 44
4222: ST_TO_ADDR
// X2 = CreateHuman ;
4223: LD_ADDR_EXP 29
4227: PUSH
4228: CALL_OW 44
4232: ST_TO_ADDR
// X3 = CreateHuman ;
4233: LD_ADDR_EXP 30
4237: PUSH
4238: CALL_OW 44
4242: ST_TO_ADDR
// PlaceHumanInUnit ( X1 , C1 ) ;
4243: LD_EXP 28
4247: PPUSH
4248: LD_EXP 25
4252: PPUSH
4253: CALL_OW 52
// PlaceHumanInUnit ( X2 , C2 ) ;
4257: LD_EXP 29
4261: PPUSH
4262: LD_EXP 26
4266: PPUSH
4267: CALL_OW 52
// PlaceHumanInUnit ( X3 , C3 ) ;
4271: LD_EXP 30
4275: PPUSH
4276: LD_EXP 27
4280: PPUSH
4281: CALL_OW 52
// PlaceUnitArea ( C1 , ATAK_LEWA , false ) ;
4285: LD_EXP 25
4289: PPUSH
4290: LD_INT 7
4292: PPUSH
4293: LD_INT 0
4295: PPUSH
4296: CALL_OW 49
// PlaceUnitArea ( C2 , ATAK_LEWA , false ) ;
4300: LD_EXP 26
4304: PPUSH
4305: LD_INT 7
4307: PPUSH
4308: LD_INT 0
4310: PPUSH
4311: CALL_OW 49
// PlaceUnitArea ( C3 , ATAK_LEWA , false ) ;
4315: LD_EXP 27
4319: PPUSH
4320: LD_INT 7
4322: PPUSH
4323: LD_INT 0
4325: PPUSH
4326: CALL_OW 49
// AddComAgressiveMove ( [ C1 , C2 , C3 , t1 , t2 , t3 , R1 , R2 , R3 ] , 12 , 5 ) ;
4330: LD_EXP 25
4334: PUSH
4335: LD_EXP 26
4339: PUSH
4340: LD_EXP 27
4344: PUSH
4345: LD_EXP 16
4349: PUSH
4350: LD_EXP 17
4354: PUSH
4355: LD_EXP 18
4359: PUSH
4360: LD_EXP 19
4364: PUSH
4365: LD_EXP 20
4369: PUSH
4370: LD_EXP 21
4374: PUSH
4375: EMPTY
4376: LIST
4377: LIST
4378: LIST
4379: LIST
4380: LIST
4381: LIST
4382: LIST
4383: LIST
4384: LIST
4385: PPUSH
4386: LD_INT 12
4388: PPUSH
4389: LD_INT 5
4391: PPUSH
4392: CALL_OW 174
// end ; end_of_file
4396: LD_VAR 0 1
4400: RET
// export L1 , L2 , L3 , K1 , K2 , K3 , O1 , O2 , O3 , I1 , I2 , I3 , Y1 , Y2 , Y3 , U1 , U2 , U3 ; export function Arabian_right ; begin
4401: LD_INT 0
4403: PPUSH
// ; SoldLevel = [ 2 , 3 , 3 ] [ Difficulty ] ;
4404: LD_ADDR_EXP 1
4408: PUSH
4409: LD_INT 2
4411: PUSH
4412: LD_INT 3
4414: PUSH
4415: LD_INT 3
4417: PUSH
4418: EMPTY
4419: LIST
4420: LIST
4421: LIST
4422: PUSH
4423: LD_OWVAR 67
4427: ARRAY
4428: ST_TO_ADDR
// EngLevel = [ 2 , 3 , 4 ] [ Difficulty ] ;
4429: LD_ADDR_EXP 2
4433: PUSH
4434: LD_INT 2
4436: PUSH
4437: LD_INT 3
4439: PUSH
4440: LD_INT 4
4442: PUSH
4443: EMPTY
4444: LIST
4445: LIST
4446: LIST
4447: PUSH
4448: LD_OWVAR 67
4452: ARRAY
4453: ST_TO_ADDR
// MechLevel = [ 6 , 7 , 8 ] [ Difficulty ] ;
4454: LD_ADDR_EXP 3
4458: PUSH
4459: LD_INT 6
4461: PUSH
4462: LD_INT 7
4464: PUSH
4465: LD_INT 8
4467: PUSH
4468: EMPTY
4469: LIST
4470: LIST
4471: LIST
4472: PUSH
4473: LD_OWVAR 67
4477: ARRAY
4478: ST_TO_ADDR
// SciLevel = [ 1 , 2 , 2 ] [ Difficulty ] ;
4479: LD_ADDR_EXP 4
4483: PUSH
4484: LD_INT 1
4486: PUSH
4487: LD_INT 2
4489: PUSH
4490: LD_INT 2
4492: PUSH
4493: EMPTY
4494: LIST
4495: LIST
4496: LIST
4497: PUSH
4498: LD_OWVAR 67
4502: ARRAY
4503: ST_TO_ADDR
// vc_chassis = 14 ;
4504: LD_ADDR_OWVAR 37
4508: PUSH
4509: LD_INT 14
4511: ST_TO_ADDR
// vc_engine = engine_combustion ;
4512: LD_ADDR_OWVAR 39
4516: PUSH
4517: LD_INT 1
4519: ST_TO_ADDR
// vc_control = control_manual ;
4520: LD_ADDR_OWVAR 38
4524: PUSH
4525: LD_INT 1
4527: ST_TO_ADDR
// vc_weapon = 27 ;
4528: LD_ADDR_OWVAR 40
4532: PUSH
4533: LD_INT 27
4535: ST_TO_ADDR
// uc_side = 2 ;
4536: LD_ADDR_OWVAR 20
4540: PUSH
4541: LD_INT 2
4543: ST_TO_ADDR
// K1 = CreateVehicle ;
4544: LD_ADDR_EXP 34
4548: PUSH
4549: CALL_OW 45
4553: ST_TO_ADDR
// K2 = CreateVehicle ;
4554: LD_ADDR_EXP 35
4558: PUSH
4559: CALL_OW 45
4563: ST_TO_ADDR
// K3 = CreateVehicle ;
4564: LD_ADDR_EXP 36
4568: PUSH
4569: CALL_OW 45
4573: ST_TO_ADDR
// hc_class = 3 ;
4574: LD_ADDR_OWVAR 28
4578: PUSH
4579: LD_INT 3
4581: ST_TO_ADDR
// uc_nation = nation_Arabian ;
4582: LD_ADDR_OWVAR 21
4586: PUSH
4587: LD_INT 2
4589: ST_TO_ADDR
// hc_name =  ;
4590: LD_ADDR_OWVAR 26
4594: PUSH
4595: LD_STRING 
4597: ST_TO_ADDR
// uc_side = 2 ;
4598: LD_ADDR_OWVAR 20
4602: PUSH
4603: LD_INT 2
4605: ST_TO_ADDR
// hc_gallery =  ;
4606: LD_ADDR_OWVAR 33
4610: PUSH
4611: LD_STRING 
4613: ST_TO_ADDR
// hc_sex = sex_male ;
4614: LD_ADDR_OWVAR 27
4618: PUSH
4619: LD_INT 1
4621: ST_TO_ADDR
// hc_skills = [ SoldLevel , EngLevel , MechLevel , SciLevel ] ;
4622: LD_ADDR_OWVAR 31
4626: PUSH
4627: LD_EXP 1
4631: PUSH
4632: LD_EXP 2
4636: PUSH
4637: LD_EXP 3
4641: PUSH
4642: LD_EXP 4
4646: PUSH
4647: EMPTY
4648: LIST
4649: LIST
4650: LIST
4651: LIST
4652: ST_TO_ADDR
// L1 = CreateHuman ;
4653: LD_ADDR_EXP 31
4657: PUSH
4658: CALL_OW 44
4662: ST_TO_ADDR
// L2 = CreateHuman ;
4663: LD_ADDR_EXP 32
4667: PUSH
4668: CALL_OW 44
4672: ST_TO_ADDR
// L3 = CreateHuman ;
4673: LD_ADDR_EXP 33
4677: PUSH
4678: CALL_OW 44
4682: ST_TO_ADDR
// PlaceHumanInUnit ( L1 , K1 ) ;
4683: LD_EXP 31
4687: PPUSH
4688: LD_EXP 34
4692: PPUSH
4693: CALL_OW 52
// PlaceHumanInUnit ( L2 , K2 ) ;
4697: LD_EXP 32
4701: PPUSH
4702: LD_EXP 35
4706: PPUSH
4707: CALL_OW 52
// PlaceHumanInUnit ( L3 , K3 ) ;
4711: LD_EXP 33
4715: PPUSH
4716: LD_EXP 36
4720: PPUSH
4721: CALL_OW 52
// PlaceUnitArea ( K1 , ATAK_PRAWA , false ) ;
4725: LD_EXP 34
4729: PPUSH
4730: LD_INT 6
4732: PPUSH
4733: LD_INT 0
4735: PPUSH
4736: CALL_OW 49
// PlaceUnitArea ( K2 , ATAK_PRAWA , false ) ;
4740: LD_EXP 35
4744: PPUSH
4745: LD_INT 6
4747: PPUSH
4748: LD_INT 0
4750: PPUSH
4751: CALL_OW 49
// PlaceUnitArea ( K3 , ATAK_PRAWA , false ) ;
4755: LD_EXP 36
4759: PPUSH
4760: LD_INT 6
4762: PPUSH
4763: LD_INT 0
4765: PPUSH
4766: CALL_OW 49
// AddComAgressiveMove ( [ K1 , K2 , K3 ] , 46 , 27 ) ;
4770: LD_EXP 34
4774: PUSH
4775: LD_EXP 35
4779: PUSH
4780: LD_EXP 36
4784: PUSH
4785: EMPTY
4786: LIST
4787: LIST
4788: LIST
4789: PPUSH
4790: LD_INT 46
4792: PPUSH
4793: LD_INT 27
4795: PPUSH
4796: CALL_OW 174
// AddComAgressiveMove ( [ K1 , K2 , K3 ] , 75 , 30 ) ;
4800: LD_EXP 34
4804: PUSH
4805: LD_EXP 35
4809: PUSH
4810: LD_EXP 36
4814: PUSH
4815: EMPTY
4816: LIST
4817: LIST
4818: LIST
4819: PPUSH
4820: LD_INT 75
4822: PPUSH
4823: LD_INT 30
4825: PPUSH
4826: CALL_OW 174
// vc_chassis = 14 ;
4830: LD_ADDR_OWVAR 37
4834: PUSH
4835: LD_INT 14
4837: ST_TO_ADDR
// vc_engine = engine_combustion ;
4838: LD_ADDR_OWVAR 39
4842: PUSH
4843: LD_INT 1
4845: ST_TO_ADDR
// vc_control = control_manual ;
4846: LD_ADDR_OWVAR 38
4850: PUSH
4851: LD_INT 1
4853: ST_TO_ADDR
// vc_weapon = 28 ;
4854: LD_ADDR_OWVAR 40
4858: PUSH
4859: LD_INT 28
4861: ST_TO_ADDR
// uc_side = 2 ;
4862: LD_ADDR_OWVAR 20
4866: PUSH
4867: LD_INT 2
4869: ST_TO_ADDR
// O1 = CreateVehicle ;
4870: LD_ADDR_EXP 37
4874: PUSH
4875: CALL_OW 45
4879: ST_TO_ADDR
// O2 = CreateVehicle ;
4880: LD_ADDR_EXP 38
4884: PUSH
4885: CALL_OW 45
4889: ST_TO_ADDR
// O3 = CreateVehicle ;
4890: LD_ADDR_EXP 39
4894: PUSH
4895: CALL_OW 45
4899: ST_TO_ADDR
// hc_class = 3 ;
4900: LD_ADDR_OWVAR 28
4904: PUSH
4905: LD_INT 3
4907: ST_TO_ADDR
// uc_nation = nation_Arabian ;
4908: LD_ADDR_OWVAR 21
4912: PUSH
4913: LD_INT 2
4915: ST_TO_ADDR
// hc_name =  ;
4916: LD_ADDR_OWVAR 26
4920: PUSH
4921: LD_STRING 
4923: ST_TO_ADDR
// uc_side = 2 ;
4924: LD_ADDR_OWVAR 20
4928: PUSH
4929: LD_INT 2
4931: ST_TO_ADDR
// hc_gallery =  ;
4932: LD_ADDR_OWVAR 33
4936: PUSH
4937: LD_STRING 
4939: ST_TO_ADDR
// hc_sex = sex_male ;
4940: LD_ADDR_OWVAR 27
4944: PUSH
4945: LD_INT 1
4947: ST_TO_ADDR
// hc_skills = [ SoldLevel , EngLevel , MechLevel , SciLevel ] ;
4948: LD_ADDR_OWVAR 31
4952: PUSH
4953: LD_EXP 1
4957: PUSH
4958: LD_EXP 2
4962: PUSH
4963: LD_EXP 3
4967: PUSH
4968: LD_EXP 4
4972: PUSH
4973: EMPTY
4974: LIST
4975: LIST
4976: LIST
4977: LIST
4978: ST_TO_ADDR
// I1 = CreateHuman ;
4979: LD_ADDR_EXP 40
4983: PUSH
4984: CALL_OW 44
4988: ST_TO_ADDR
// I2 = CreateHuman ;
4989: LD_ADDR_EXP 41
4993: PUSH
4994: CALL_OW 44
4998: ST_TO_ADDR
// I3 = CreateHuman ;
4999: LD_ADDR_EXP 42
5003: PUSH
5004: CALL_OW 44
5008: ST_TO_ADDR
// PlaceHumanInUnit ( I1 , O1 ) ;
5009: LD_EXP 40
5013: PPUSH
5014: LD_EXP 37
5018: PPUSH
5019: CALL_OW 52
// PlaceHumanInUnit ( I2 , O2 ) ;
5023: LD_EXP 41
5027: PPUSH
5028: LD_EXP 38
5032: PPUSH
5033: CALL_OW 52
// PlaceHumanInUnit ( I3 , O3 ) ;
5037: LD_EXP 42
5041: PPUSH
5042: LD_EXP 39
5046: PPUSH
5047: CALL_OW 52
// PlaceUnitArea ( O1 , ATAK_PRAWA , false ) ;
5051: LD_EXP 37
5055: PPUSH
5056: LD_INT 6
5058: PPUSH
5059: LD_INT 0
5061: PPUSH
5062: CALL_OW 49
// PlaceUnitArea ( O2 , ATAK_PRAWA , false ) ;
5066: LD_EXP 38
5070: PPUSH
5071: LD_INT 6
5073: PPUSH
5074: LD_INT 0
5076: PPUSH
5077: CALL_OW 49
// PlaceUnitArea ( O3 , ATAK_PRAWA , false ) ;
5081: LD_EXP 39
5085: PPUSH
5086: LD_INT 6
5088: PPUSH
5089: LD_INT 0
5091: PPUSH
5092: CALL_OW 49
// AddComAgressiveMove ( [ O1 , O2 , O3 ] , 46 , 27 ) ;
5096: LD_EXP 37
5100: PUSH
5101: LD_EXP 38
5105: PUSH
5106: LD_EXP 39
5110: PUSH
5111: EMPTY
5112: LIST
5113: LIST
5114: LIST
5115: PPUSH
5116: LD_INT 46
5118: PPUSH
5119: LD_INT 27
5121: PPUSH
5122: CALL_OW 174
// AddComAgressiveMove ( [ O1 , O2 , O3 ] , 75 , 30 ) ;
5126: LD_EXP 37
5130: PUSH
5131: LD_EXP 38
5135: PUSH
5136: LD_EXP 39
5140: PUSH
5141: EMPTY
5142: LIST
5143: LIST
5144: LIST
5145: PPUSH
5146: LD_INT 75
5148: PPUSH
5149: LD_INT 30
5151: PPUSH
5152: CALL_OW 174
// vc_chassis = 14 ;
5156: LD_ADDR_OWVAR 37
5160: PUSH
5161: LD_INT 14
5163: ST_TO_ADDR
// vc_engine = engine_combustion ;
5164: LD_ADDR_OWVAR 39
5168: PUSH
5169: LD_INT 1
5171: ST_TO_ADDR
// vc_control = control_manual ;
5172: LD_ADDR_OWVAR 38
5176: PUSH
5177: LD_INT 1
5179: ST_TO_ADDR
// vc_weapon = 24 ;
5180: LD_ADDR_OWVAR 40
5184: PUSH
5185: LD_INT 24
5187: ST_TO_ADDR
// uc_side = 2 ;
5188: LD_ADDR_OWVAR 20
5192: PUSH
5193: LD_INT 2
5195: ST_TO_ADDR
// Y1 = CreateVehicle ;
5196: LD_ADDR_EXP 43
5200: PUSH
5201: CALL_OW 45
5205: ST_TO_ADDR
// Y2 = CreateVehicle ;
5206: LD_ADDR_EXP 44
5210: PUSH
5211: CALL_OW 45
5215: ST_TO_ADDR
// Y3 = CreateVehicle ;
5216: LD_ADDR_EXP 45
5220: PUSH
5221: CALL_OW 45
5225: ST_TO_ADDR
// hc_class = 3 ;
5226: LD_ADDR_OWVAR 28
5230: PUSH
5231: LD_INT 3
5233: ST_TO_ADDR
// uc_nation = nation_Arabian ;
5234: LD_ADDR_OWVAR 21
5238: PUSH
5239: LD_INT 2
5241: ST_TO_ADDR
// hc_name =  ;
5242: LD_ADDR_OWVAR 26
5246: PUSH
5247: LD_STRING 
5249: ST_TO_ADDR
// uc_side = 2 ;
5250: LD_ADDR_OWVAR 20
5254: PUSH
5255: LD_INT 2
5257: ST_TO_ADDR
// hc_gallery =  ;
5258: LD_ADDR_OWVAR 33
5262: PUSH
5263: LD_STRING 
5265: ST_TO_ADDR
// hc_sex = sex_male ;
5266: LD_ADDR_OWVAR 27
5270: PUSH
5271: LD_INT 1
5273: ST_TO_ADDR
// hc_skills = [ SoldLevel , EngLevel , MechLevel , SciLevel ] ;
5274: LD_ADDR_OWVAR 31
5278: PUSH
5279: LD_EXP 1
5283: PUSH
5284: LD_EXP 2
5288: PUSH
5289: LD_EXP 3
5293: PUSH
5294: LD_EXP 4
5298: PUSH
5299: EMPTY
5300: LIST
5301: LIST
5302: LIST
5303: LIST
5304: ST_TO_ADDR
// U1 = CreateHuman ;
5305: LD_ADDR_EXP 46
5309: PUSH
5310: CALL_OW 44
5314: ST_TO_ADDR
// U2 = CreateHuman ;
5315: LD_ADDR_EXP 47
5319: PUSH
5320: CALL_OW 44
5324: ST_TO_ADDR
// U3 = CreateHuman ;
5325: LD_ADDR_EXP 48
5329: PUSH
5330: CALL_OW 44
5334: ST_TO_ADDR
// PlaceHumanInUnit ( U1 , Y1 ) ;
5335: LD_EXP 46
5339: PPUSH
5340: LD_EXP 43
5344: PPUSH
5345: CALL_OW 52
// PlaceHumanInUnit ( U2 , Y2 ) ;
5349: LD_EXP 47
5353: PPUSH
5354: LD_EXP 44
5358: PPUSH
5359: CALL_OW 52
// PlaceHumanInUnit ( U3 , Y3 ) ;
5363: LD_EXP 48
5367: PPUSH
5368: LD_EXP 45
5372: PPUSH
5373: CALL_OW 52
// PlaceUnitArea ( Y1 , ATAK_PRAWA , false ) ;
5377: LD_EXP 43
5381: PPUSH
5382: LD_INT 6
5384: PPUSH
5385: LD_INT 0
5387: PPUSH
5388: CALL_OW 49
// PlaceUnitArea ( Y2 , ATAK_PRAWA , false ) ;
5392: LD_EXP 44
5396: PPUSH
5397: LD_INT 6
5399: PPUSH
5400: LD_INT 0
5402: PPUSH
5403: CALL_OW 49
// PlaceUnitArea ( Y3 , ATAK_PRAWA , false ) ;
5407: LD_EXP 45
5411: PPUSH
5412: LD_INT 6
5414: PPUSH
5415: LD_INT 0
5417: PPUSH
5418: CALL_OW 49
// AddComAgressiveMove ( [ Y1 , Y2 , Y3 ] , 46 , 27 ) ;
5422: LD_EXP 43
5426: PUSH
5427: LD_EXP 44
5431: PUSH
5432: LD_EXP 45
5436: PUSH
5437: EMPTY
5438: LIST
5439: LIST
5440: LIST
5441: PPUSH
5442: LD_INT 46
5444: PPUSH
5445: LD_INT 27
5447: PPUSH
5448: CALL_OW 174
// AddComAgressiveMove ( [ Y1 , Y2 , Y3 ] , 75 , 30 ) ;
5452: LD_EXP 43
5456: PUSH
5457: LD_EXP 44
5461: PUSH
5462: LD_EXP 45
5466: PUSH
5467: EMPTY
5468: LIST
5469: LIST
5470: LIST
5471: PPUSH
5472: LD_INT 75
5474: PPUSH
5475: LD_INT 30
5477: PPUSH
5478: CALL_OW 174
// end ; end_of_file
5482: LD_VAR 0 1
5486: RET
// export H1 , H2 , H3 , H4 , H5 , H6 , H7 , H8 , H9 , H0 ; export function ATAK_LEWA_1 ; begin
5487: LD_INT 0
5489: PPUSH
// ; SoldLevel = [ 7 , 8 , 10 ] [ Difficulty ] ;
5490: LD_ADDR_EXP 1
5494: PUSH
5495: LD_INT 7
5497: PUSH
5498: LD_INT 8
5500: PUSH
5501: LD_INT 10
5503: PUSH
5504: EMPTY
5505: LIST
5506: LIST
5507: LIST
5508: PUSH
5509: LD_OWVAR 67
5513: ARRAY
5514: ST_TO_ADDR
// EngLevel = [ 6 , 8 , 8 ] [ Difficulty ] ;
5515: LD_ADDR_EXP 2
5519: PUSH
5520: LD_INT 6
5522: PUSH
5523: LD_INT 8
5525: PUSH
5526: LD_INT 8
5528: PUSH
5529: EMPTY
5530: LIST
5531: LIST
5532: LIST
5533: PUSH
5534: LD_OWVAR 67
5538: ARRAY
5539: ST_TO_ADDR
// MechLevel = [ 6 , 7 , 8 ] [ Difficulty ] ;
5540: LD_ADDR_EXP 3
5544: PUSH
5545: LD_INT 6
5547: PUSH
5548: LD_INT 7
5550: PUSH
5551: LD_INT 8
5553: PUSH
5554: EMPTY
5555: LIST
5556: LIST
5557: LIST
5558: PUSH
5559: LD_OWVAR 67
5563: ARRAY
5564: ST_TO_ADDR
// SciLevel = [ 6 , 7 , 7 ] [ Difficulty ] ;
5565: LD_ADDR_EXP 4
5569: PUSH
5570: LD_INT 6
5572: PUSH
5573: LD_INT 7
5575: PUSH
5576: LD_INT 7
5578: PUSH
5579: EMPTY
5580: LIST
5581: LIST
5582: LIST
5583: PUSH
5584: LD_OWVAR 67
5588: ARRAY
5589: ST_TO_ADDR
// hc_name =  ;
5590: LD_ADDR_OWVAR 26
5594: PUSH
5595: LD_STRING 
5597: ST_TO_ADDR
// uc_nation = nation_Arabian ;
5598: LD_ADDR_OWVAR 21
5602: PUSH
5603: LD_INT 2
5605: ST_TO_ADDR
// hc_class = 1 ;
5606: LD_ADDR_OWVAR 28
5610: PUSH
5611: LD_INT 1
5613: ST_TO_ADDR
// uc_side = 2 ;
5614: LD_ADDR_OWVAR 20
5618: PUSH
5619: LD_INT 2
5621: ST_TO_ADDR
// hc_gallery =  ;
5622: LD_ADDR_OWVAR 33
5626: PUSH
5627: LD_STRING 
5629: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
5630: LD_ADDR_OWVAR 29
5634: PUSH
5635: LD_INT 10
5637: PUSH
5638: LD_INT 10
5640: PUSH
5641: EMPTY
5642: LIST
5643: LIST
5644: ST_TO_ADDR
// hc_basic_skills = [ 10 , 10 , 10 , 10 ] ;
5645: LD_ADDR_OWVAR 30
5649: PUSH
5650: LD_INT 10
5652: PUSH
5653: LD_INT 10
5655: PUSH
5656: LD_INT 10
5658: PUSH
5659: LD_INT 10
5661: PUSH
5662: EMPTY
5663: LIST
5664: LIST
5665: LIST
5666: LIST
5667: ST_TO_ADDR
// hc_importance = 10 ;
5668: LD_ADDR_OWVAR 32
5672: PUSH
5673: LD_INT 10
5675: ST_TO_ADDR
// H1 = CreateHuman ;
5676: LD_ADDR_EXP 49
5680: PUSH
5681: CALL_OW 44
5685: ST_TO_ADDR
// H2 = CreateHuman ;
5686: LD_ADDR_EXP 50
5690: PUSH
5691: CALL_OW 44
5695: ST_TO_ADDR
// H3 = CreateHuman ;
5696: LD_ADDR_EXP 51
5700: PUSH
5701: CALL_OW 44
5705: ST_TO_ADDR
// H4 = CreateHuman ;
5706: LD_ADDR_EXP 52
5710: PUSH
5711: CALL_OW 44
5715: ST_TO_ADDR
// H5 = CreateHuman ;
5716: LD_ADDR_EXP 53
5720: PUSH
5721: CALL_OW 44
5725: ST_TO_ADDR
// H6 = CreateHuman ;
5726: LD_ADDR_EXP 54
5730: PUSH
5731: CALL_OW 44
5735: ST_TO_ADDR
// H7 = CreateHuman ;
5736: LD_ADDR_EXP 55
5740: PUSH
5741: CALL_OW 44
5745: ST_TO_ADDR
// H8 = CreateHuman ;
5746: LD_ADDR_EXP 56
5750: PUSH
5751: CALL_OW 44
5755: ST_TO_ADDR
// H9 = CreateHuman ;
5756: LD_ADDR_EXP 57
5760: PUSH
5761: CALL_OW 44
5765: ST_TO_ADDR
// H0 = CreateHuman ;
5766: LD_ADDR_EXP 58
5770: PUSH
5771: CALL_OW 44
5775: ST_TO_ADDR
// PlaceUnitArea ( H1 , ATAK_LEWA , false ) ;
5776: LD_EXP 49
5780: PPUSH
5781: LD_INT 7
5783: PPUSH
5784: LD_INT 0
5786: PPUSH
5787: CALL_OW 49
// PlaceUnitArea ( H2 , ATAK_LEWA , false ) ;
5791: LD_EXP 50
5795: PPUSH
5796: LD_INT 7
5798: PPUSH
5799: LD_INT 0
5801: PPUSH
5802: CALL_OW 49
// PlaceUnitArea ( H3 , ATAK_LEWA , false ) ;
5806: LD_EXP 51
5810: PPUSH
5811: LD_INT 7
5813: PPUSH
5814: LD_INT 0
5816: PPUSH
5817: CALL_OW 49
// PlaceUnitArea ( H4 , ATAK_LEWA , false ) ;
5821: LD_EXP 52
5825: PPUSH
5826: LD_INT 7
5828: PPUSH
5829: LD_INT 0
5831: PPUSH
5832: CALL_OW 49
// PlaceUnitArea ( H5 , ATAK_LEWA , false ) ;
5836: LD_EXP 53
5840: PPUSH
5841: LD_INT 7
5843: PPUSH
5844: LD_INT 0
5846: PPUSH
5847: CALL_OW 49
// PlaceUnitArea ( H7 , ATAK_LEWA , false ) ;
5851: LD_EXP 55
5855: PPUSH
5856: LD_INT 7
5858: PPUSH
5859: LD_INT 0
5861: PPUSH
5862: CALL_OW 49
// PlaceUnitArea ( H6 , ATAK_LEWA , false ) ;
5866: LD_EXP 54
5870: PPUSH
5871: LD_INT 7
5873: PPUSH
5874: LD_INT 0
5876: PPUSH
5877: CALL_OW 49
// PlaceUnitArea ( H8 , ATAK_LEWA , false ) ;
5881: LD_EXP 56
5885: PPUSH
5886: LD_INT 7
5888: PPUSH
5889: LD_INT 0
5891: PPUSH
5892: CALL_OW 49
// PlaceUnitArea ( H9 , ATAK_LEWA , false ) ;
5896: LD_EXP 57
5900: PPUSH
5901: LD_INT 7
5903: PPUSH
5904: LD_INT 0
5906: PPUSH
5907: CALL_OW 49
// PlaceUnitArea ( H0 , ATAK_LEWA , false ) ;
5911: LD_EXP 58
5915: PPUSH
5916: LD_INT 7
5918: PPUSH
5919: LD_INT 0
5921: PPUSH
5922: CALL_OW 49
// AddComAgressiveMove ( [ H1 , H2 , H3 , H4 , H5 , H6 , H7 , H8 , H9 ] , 12 , 5 ) ;
5926: LD_EXP 49
5930: PUSH
5931: LD_EXP 50
5935: PUSH
5936: LD_EXP 51
5940: PUSH
5941: LD_EXP 52
5945: PUSH
5946: LD_EXP 53
5950: PUSH
5951: LD_EXP 54
5955: PUSH
5956: LD_EXP 55
5960: PUSH
5961: LD_EXP 56
5965: PUSH
5966: LD_EXP 57
5970: PUSH
5971: EMPTY
5972: LIST
5973: LIST
5974: LIST
5975: LIST
5976: LIST
5977: LIST
5978: LIST
5979: LIST
5980: LIST
5981: PPUSH
5982: LD_INT 12
5984: PPUSH
5985: LD_INT 5
5987: PPUSH
5988: CALL_OW 174
// end ; end_of_file
5992: LD_VAR 0 1
5996: RET
// export W1 , W2 , W3 , W4 , W5 , W6 , W7 , W8 , W9 , W0 ; export function ATAK_PRAWA_1 ; begin
5997: LD_INT 0
5999: PPUSH
// ; hc_name =  ;
6000: LD_ADDR_OWVAR 26
6004: PUSH
6005: LD_STRING 
6007: ST_TO_ADDR
// uc_nation = nation_Arabian ;
6008: LD_ADDR_OWVAR 21
6012: PUSH
6013: LD_INT 2
6015: ST_TO_ADDR
// hc_class = 1 ;
6016: LD_ADDR_OWVAR 28
6020: PUSH
6021: LD_INT 1
6023: ST_TO_ADDR
// uc_side = 2 ;
6024: LD_ADDR_OWVAR 20
6028: PUSH
6029: LD_INT 2
6031: ST_TO_ADDR
// hc_gallery =  ;
6032: LD_ADDR_OWVAR 33
6036: PUSH
6037: LD_STRING 
6039: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
6040: LD_ADDR_OWVAR 29
6044: PUSH
6045: LD_INT 10
6047: PUSH
6048: LD_INT 10
6050: PUSH
6051: EMPTY
6052: LIST
6053: LIST
6054: ST_TO_ADDR
// hc_skills = [ SoldLevel , EngLevel , MechLevel , SciLevel ] ;
6055: LD_ADDR_OWVAR 31
6059: PUSH
6060: LD_EXP 1
6064: PUSH
6065: LD_EXP 2
6069: PUSH
6070: LD_EXP 3
6074: PUSH
6075: LD_EXP 4
6079: PUSH
6080: EMPTY
6081: LIST
6082: LIST
6083: LIST
6084: LIST
6085: ST_TO_ADDR
// hc_importance = 10 ;
6086: LD_ADDR_OWVAR 32
6090: PUSH
6091: LD_INT 10
6093: ST_TO_ADDR
// W1 = CreateHuman ;
6094: LD_ADDR_EXP 59
6098: PUSH
6099: CALL_OW 44
6103: ST_TO_ADDR
// W2 = CreateHuman ;
6104: LD_ADDR_EXP 60
6108: PUSH
6109: CALL_OW 44
6113: ST_TO_ADDR
// W3 = CreateHuman ;
6114: LD_ADDR_EXP 61
6118: PUSH
6119: CALL_OW 44
6123: ST_TO_ADDR
// W4 = CreateHuman ;
6124: LD_ADDR_EXP 62
6128: PUSH
6129: CALL_OW 44
6133: ST_TO_ADDR
// W5 = CreateHuman ;
6134: LD_ADDR_EXP 63
6138: PUSH
6139: CALL_OW 44
6143: ST_TO_ADDR
// W6 = CreateHuman ;
6144: LD_ADDR_EXP 64
6148: PUSH
6149: CALL_OW 44
6153: ST_TO_ADDR
// W7 = CreateHuman ;
6154: LD_ADDR_EXP 65
6158: PUSH
6159: CALL_OW 44
6163: ST_TO_ADDR
// W8 = CreateHuman ;
6164: LD_ADDR_EXP 66
6168: PUSH
6169: CALL_OW 44
6173: ST_TO_ADDR
// W9 = CreateHuman ;
6174: LD_ADDR_EXP 67
6178: PUSH
6179: CALL_OW 44
6183: ST_TO_ADDR
// W0 = CreateHuman ;
6184: LD_ADDR_EXP 68
6188: PUSH
6189: CALL_OW 44
6193: ST_TO_ADDR
// PlaceUnitArea ( W1 , ATA_LEWAz , false ) ;
6194: LD_EXP 59
6198: PPUSH
6199: LD_INT 8
6201: PPUSH
6202: LD_INT 0
6204: PPUSH
6205: CALL_OW 49
// PlaceUnitArea ( W2 , ATA_LEWAz , false ) ;
6209: LD_EXP 60
6213: PPUSH
6214: LD_INT 8
6216: PPUSH
6217: LD_INT 0
6219: PPUSH
6220: CALL_OW 49
// PlaceUnitArea ( W3 , ATA_LEWAz , false ) ;
6224: LD_EXP 61
6228: PPUSH
6229: LD_INT 8
6231: PPUSH
6232: LD_INT 0
6234: PPUSH
6235: CALL_OW 49
// PlaceUnitArea ( W4 , ATA_LEWAz , false ) ;
6239: LD_EXP 62
6243: PPUSH
6244: LD_INT 8
6246: PPUSH
6247: LD_INT 0
6249: PPUSH
6250: CALL_OW 49
// PlaceUnitArea ( W5 , ATA_LEWAz , false ) ;
6254: LD_EXP 63
6258: PPUSH
6259: LD_INT 8
6261: PPUSH
6262: LD_INT 0
6264: PPUSH
6265: CALL_OW 49
// PlaceUnitArea ( W7 , ATA_LEWAz , false ) ;
6269: LD_EXP 65
6273: PPUSH
6274: LD_INT 8
6276: PPUSH
6277: LD_INT 0
6279: PPUSH
6280: CALL_OW 49
// PlaceUnitArea ( W6 , ATA_LEWAz , false ) ;
6284: LD_EXP 64
6288: PPUSH
6289: LD_INT 8
6291: PPUSH
6292: LD_INT 0
6294: PPUSH
6295: CALL_OW 49
// PlaceUnitArea ( W8 , ATA_LEWAz , false ) ;
6299: LD_EXP 66
6303: PPUSH
6304: LD_INT 8
6306: PPUSH
6307: LD_INT 0
6309: PPUSH
6310: CALL_OW 49
// PlaceUnitArea ( W9 , ATA_LEWAz , false ) ;
6314: LD_EXP 67
6318: PPUSH
6319: LD_INT 8
6321: PPUSH
6322: LD_INT 0
6324: PPUSH
6325: CALL_OW 49
// PlaceUnitArea ( W0 , ATA_LEWAz , false ) ;
6329: LD_EXP 68
6333: PPUSH
6334: LD_INT 8
6336: PPUSH
6337: LD_INT 0
6339: PPUSH
6340: CALL_OW 49
// AddComAgressiveMove ( [ W1 , W2 , W3 , W4 , W5 , W6 , W7 , W8 , W9 , W0 ] , 70 , 27 ) ;
6344: LD_EXP 59
6348: PUSH
6349: LD_EXP 60
6353: PUSH
6354: LD_EXP 61
6358: PUSH
6359: LD_EXP 62
6363: PUSH
6364: LD_EXP 63
6368: PUSH
6369: LD_EXP 64
6373: PUSH
6374: LD_EXP 65
6378: PUSH
6379: LD_EXP 66
6383: PUSH
6384: LD_EXP 67
6388: PUSH
6389: LD_EXP 68
6393: PUSH
6394: EMPTY
6395: LIST
6396: LIST
6397: LIST
6398: LIST
6399: LIST
6400: LIST
6401: LIST
6402: LIST
6403: LIST
6404: LIST
6405: PPUSH
6406: LD_INT 70
6408: PPUSH
6409: LD_INT 27
6411: PPUSH
6412: CALL_OW 174
// end ; end_of_file
6416: LD_VAR 0 1
6420: RET
// export Center ; every 0 0$1 trigger Center = 1 do
6421: LD_EXP 69
6425: PUSH
6426: LD_INT 1
6428: EQUAL
6429: IFFALSE 6444
6431: GO 6433
6433: DISABLE
// begin ; CenterNowOnUnits ( OWChyba ) ;
6434: LD_EXP 11
6438: PPUSH
6439: CALL_OW 87
// enable ;
6443: ENABLE
// end ; end_of_file
6444: END
// export PULK_02 , Z1 , Z2 , B1 , B2 , S20 , S21 , FG1 , FG2 ; export function zdrajcy ; begin
6445: LD_INT 0
6447: PPUSH
// ; uc_side = 1 ;
6448: LD_ADDR_OWVAR 20
6452: PUSH
6453: LD_INT 1
6455: ST_TO_ADDR
// uc_nation = 1 ;
6456: LD_ADDR_OWVAR 21
6460: PUSH
6461: LD_INT 1
6463: ST_TO_ADDR
// PULK_02 := CreateCharacter ( PULK_02 ) ;
6464: LD_ADDR_EXP 70
6468: PUSH
6469: LD_STRING PULK_02
6471: PPUSH
6472: CALL_OW 34
6476: ST_TO_ADDR
// vc_chassis = 4 ;
6477: LD_ADDR_OWVAR 37
6481: PUSH
6482: LD_INT 4
6484: ST_TO_ADDR
// vc_engine = engine_combustion ;
6485: LD_ADDR_OWVAR 39
6489: PUSH
6490: LD_INT 1
6492: ST_TO_ADDR
// vc_control = control_manual ;
6493: LD_ADDR_OWVAR 38
6497: PUSH
6498: LD_INT 1
6500: ST_TO_ADDR
// vc_weapon = 6 ;
6501: LD_ADDR_OWVAR 40
6505: PUSH
6506: LD_INT 6
6508: ST_TO_ADDR
// uc_side = 2 ;
6509: LD_ADDR_OWVAR 20
6513: PUSH
6514: LD_INT 2
6516: ST_TO_ADDR
// Z1 = CreateVehicle ;
6517: LD_ADDR_EXP 71
6521: PUSH
6522: CALL_OW 45
6526: ST_TO_ADDR
// Z2 = CreateVehicle ;
6527: LD_ADDR_EXP 72
6531: PUSH
6532: CALL_OW 45
6536: ST_TO_ADDR
// hc_class = 3 ;
6537: LD_ADDR_OWVAR 28
6541: PUSH
6542: LD_INT 3
6544: ST_TO_ADDR
// uc_nation = nation_american ;
6545: LD_ADDR_OWVAR 21
6549: PUSH
6550: LD_INT 1
6552: ST_TO_ADDR
// hc_name =  ;
6553: LD_ADDR_OWVAR 26
6557: PUSH
6558: LD_STRING 
6560: ST_TO_ADDR
// uc_side = 2 ;
6561: LD_ADDR_OWVAR 20
6565: PUSH
6566: LD_INT 2
6568: ST_TO_ADDR
// hc_gallery =  ;
6569: LD_ADDR_OWVAR 33
6573: PUSH
6574: LD_STRING 
6576: ST_TO_ADDR
// hc_sex = sex_male ;
6577: LD_ADDR_OWVAR 27
6581: PUSH
6582: LD_INT 1
6584: ST_TO_ADDR
// hc_skills = [ 3 , 3 , 8 , 3 ] ;
6585: LD_ADDR_OWVAR 31
6589: PUSH
6590: LD_INT 3
6592: PUSH
6593: LD_INT 3
6595: PUSH
6596: LD_INT 8
6598: PUSH
6599: LD_INT 3
6601: PUSH
6602: EMPTY
6603: LIST
6604: LIST
6605: LIST
6606: LIST
6607: ST_TO_ADDR
// B1 = CreateHuman ;
6608: LD_ADDR_EXP 73
6612: PUSH
6613: CALL_OW 44
6617: ST_TO_ADDR
// B2 = CreateHuman ;
6618: LD_ADDR_EXP 74
6622: PUSH
6623: CALL_OW 44
6627: ST_TO_ADDR
// PlaceHumanInUnit ( B1 , Z1 ) ;
6628: LD_EXP 73
6632: PPUSH
6633: LD_EXP 71
6637: PPUSH
6638: CALL_OW 52
// PlaceHumanInUnit ( B2 , Z2 ) ;
6642: LD_EXP 74
6646: PPUSH
6647: LD_EXP 72
6651: PPUSH
6652: CALL_OW 52
// PlaceUnitArea ( Z1 , ATAK_PRAWA , false ) ;
6656: LD_EXP 71
6660: PPUSH
6661: LD_INT 6
6663: PPUSH
6664: LD_INT 0
6666: PPUSH
6667: CALL_OW 49
// PlaceUnitArea ( Z2 , ATAK_PRAWA , false ) ;
6671: LD_EXP 72
6675: PPUSH
6676: LD_INT 6
6678: PPUSH
6679: LD_INT 0
6681: PPUSH
6682: CALL_OW 49
// vc_chassis = 4 ;
6686: LD_ADDR_OWVAR 37
6690: PUSH
6691: LD_INT 4
6693: ST_TO_ADDR
// vc_engine = engine_combustion ;
6694: LD_ADDR_OWVAR 39
6698: PUSH
6699: LD_INT 1
6701: ST_TO_ADDR
// vc_control = control_manual ;
6702: LD_ADDR_OWVAR 38
6706: PUSH
6707: LD_INT 1
6709: ST_TO_ADDR
// vc_weapon = 5 ;
6710: LD_ADDR_OWVAR 40
6714: PUSH
6715: LD_INT 5
6717: ST_TO_ADDR
// uc_side = 2 ;
6718: LD_ADDR_OWVAR 20
6722: PUSH
6723: LD_INT 2
6725: ST_TO_ADDR
// S20 = CreateVehicle ;
6726: LD_ADDR_EXP 75
6730: PUSH
6731: CALL_OW 45
6735: ST_TO_ADDR
// S21 = CreateVehicle ;
6736: LD_ADDR_EXP 76
6740: PUSH
6741: CALL_OW 45
6745: ST_TO_ADDR
// hc_class = 3 ;
6746: LD_ADDR_OWVAR 28
6750: PUSH
6751: LD_INT 3
6753: ST_TO_ADDR
// uc_nation = nation_american ;
6754: LD_ADDR_OWVAR 21
6758: PUSH
6759: LD_INT 1
6761: ST_TO_ADDR
// hc_name =  ;
6762: LD_ADDR_OWVAR 26
6766: PUSH
6767: LD_STRING 
6769: ST_TO_ADDR
// uc_side = 2 ;
6770: LD_ADDR_OWVAR 20
6774: PUSH
6775: LD_INT 2
6777: ST_TO_ADDR
// hc_gallery =  ;
6778: LD_ADDR_OWVAR 33
6782: PUSH
6783: LD_STRING 
6785: ST_TO_ADDR
// hc_sex = sex_male ;
6786: LD_ADDR_OWVAR 27
6790: PUSH
6791: LD_INT 1
6793: ST_TO_ADDR
// hc_skills = [ 3 , 3 , 8 , 3 ] ;
6794: LD_ADDR_OWVAR 31
6798: PUSH
6799: LD_INT 3
6801: PUSH
6802: LD_INT 3
6804: PUSH
6805: LD_INT 8
6807: PUSH
6808: LD_INT 3
6810: PUSH
6811: EMPTY
6812: LIST
6813: LIST
6814: LIST
6815: LIST
6816: ST_TO_ADDR
// FG1 = CreateHuman ;
6817: LD_ADDR_EXP 77
6821: PUSH
6822: CALL_OW 44
6826: ST_TO_ADDR
// FG2 = CreateHuman ;
6827: LD_ADDR_EXP 78
6831: PUSH
6832: CALL_OW 44
6836: ST_TO_ADDR
// PlaceHumanInUnit ( FG1 , S20 ) ;
6837: LD_EXP 77
6841: PPUSH
6842: LD_EXP 75
6846: PPUSH
6847: CALL_OW 52
// PlaceHumanInUnit ( FG2 , S21 ) ;
6851: LD_EXP 78
6855: PPUSH
6856: LD_EXP 76
6860: PPUSH
6861: CALL_OW 52
// PlaceUnitArea ( S21 , ATAK_PRAWA , false ) ;
6865: LD_EXP 76
6869: PPUSH
6870: LD_INT 6
6872: PPUSH
6873: LD_INT 0
6875: PPUSH
6876: CALL_OW 49
// PlaceUnitArea ( S20 , ATAK_PRAWA , false ) ;
6880: LD_EXP 75
6884: PPUSH
6885: LD_INT 6
6887: PPUSH
6888: LD_INT 0
6890: PPUSH
6891: CALL_OW 49
// AddComAgressiveMove ( [ S20 , S21 , Z1 , Z2 ] , 77 , 47 ) ;
6895: LD_EXP 75
6899: PUSH
6900: LD_EXP 76
6904: PUSH
6905: LD_EXP 71
6909: PUSH
6910: LD_EXP 72
6914: PUSH
6915: EMPTY
6916: LIST
6917: LIST
6918: LIST
6919: LIST
6920: PPUSH
6921: LD_INT 77
6923: PPUSH
6924: LD_INT 47
6926: PPUSH
6927: CALL_OW 174
// end ; end_of_file
6931: LD_VAR 0 1
6935: RET
// every 0 0$1 trigger IsDead ( OWChyba ) do
6936: LD_EXP 11
6940: PPUSH
6941: CALL_OW 301
6945: IFFALSE 6957
6947: GO 6949
6949: DISABLE
// begin YouLost ( ded ) ;
6950: LD_STRING ded
6952: PPUSH
6953: CALL_OW 104
// end ;
6957: END
// on Contact ( side1 , side2 ) do begin if side1 = 1 and side2 = 4 then
6958: LD_VAR 0 1
6962: PUSH
6963: LD_INT 1
6965: EQUAL
6966: PUSH
6967: LD_VAR 0 2
6971: PUSH
6972: LD_INT 4
6974: EQUAL
6975: AND
6976: IFFALSE 6985
// begin YouLost ( SojAtak ) ;
6978: LD_STRING SojAtak
6980: PPUSH
6981: CALL_OW 104
// end ; end ; end_of_file
6985: PPOPN 2
6987: END
// export function medale ; begin
6988: LD_INT 0
6990: PPUSH
// ; AddMedal ( med1 , 1 ) ;
6991: LD_STRING med1
6993: PPUSH
6994: LD_INT 1
6996: PPUSH
6997: CALL_OW 101
// AddMedal ( med2 , 1 ) ;
7001: LD_STRING med2
7003: PPUSH
7004: LD_INT 1
7006: PPUSH
7007: CALL_OW 101
// AddMedal ( med3 , 1 ) ;
7011: LD_STRING med3
7013: PPUSH
7014: LD_INT 1
7016: PPUSH
7017: CALL_OW 101
// GiveMedals ( MAIN ) ;
7021: LD_STRING MAIN
7023: PPUSH
7024: CALL_OW 102
// end ; end_of_file
7028: LD_VAR 0 1
7032: RET
// export LA1 , LA2 , LA3 , KS1 , KS2 , KS3 , WO1 , WO2 , WO3 , ID1 , ID2 , ID3 ; export function Arabian_right_1 ; begin
7033: LD_INT 0
7035: PPUSH
// ; vc_chassis = 14 ;
7036: LD_ADDR_OWVAR 37
7040: PUSH
7041: LD_INT 14
7043: ST_TO_ADDR
// vc_engine = engine_combustion ;
7044: LD_ADDR_OWVAR 39
7048: PUSH
7049: LD_INT 1
7051: ST_TO_ADDR
// vc_control = control_manual ;
7052: LD_ADDR_OWVAR 38
7056: PUSH
7057: LD_INT 1
7059: ST_TO_ADDR
// vc_weapon = 27 ;
7060: LD_ADDR_OWVAR 40
7064: PUSH
7065: LD_INT 27
7067: ST_TO_ADDR
// uc_side = 2 ;
7068: LD_ADDR_OWVAR 20
7072: PUSH
7073: LD_INT 2
7075: ST_TO_ADDR
// KS1 = CreateVehicle ;
7076: LD_ADDR_EXP 82
7080: PUSH
7081: CALL_OW 45
7085: ST_TO_ADDR
// KS2 = CreateVehicle ;
7086: LD_ADDR_EXP 83
7090: PUSH
7091: CALL_OW 45
7095: ST_TO_ADDR
// KS3 = CreateVehicle ;
7096: LD_ADDR_EXP 84
7100: PUSH
7101: CALL_OW 45
7105: ST_TO_ADDR
// hc_class = 3 ;
7106: LD_ADDR_OWVAR 28
7110: PUSH
7111: LD_INT 3
7113: ST_TO_ADDR
// uc_nation = nation_Arabian ;
7114: LD_ADDR_OWVAR 21
7118: PUSH
7119: LD_INT 2
7121: ST_TO_ADDR
// hc_name =  ;
7122: LD_ADDR_OWVAR 26
7126: PUSH
7127: LD_STRING 
7129: ST_TO_ADDR
// uc_side = 2 ;
7130: LD_ADDR_OWVAR 20
7134: PUSH
7135: LD_INT 2
7137: ST_TO_ADDR
// hc_gallery =  ;
7138: LD_ADDR_OWVAR 33
7142: PUSH
7143: LD_STRING 
7145: ST_TO_ADDR
// hc_sex = sex_male ;
7146: LD_ADDR_OWVAR 27
7150: PUSH
7151: LD_INT 1
7153: ST_TO_ADDR
// hc_skills = [ 3 , 3 , 3 , 3 ] ;
7154: LD_ADDR_OWVAR 31
7158: PUSH
7159: LD_INT 3
7161: PUSH
7162: LD_INT 3
7164: PUSH
7165: LD_INT 3
7167: PUSH
7168: LD_INT 3
7170: PUSH
7171: EMPTY
7172: LIST
7173: LIST
7174: LIST
7175: LIST
7176: ST_TO_ADDR
// LA1 = CreateHuman ;
7177: LD_ADDR_EXP 79
7181: PUSH
7182: CALL_OW 44
7186: ST_TO_ADDR
// LA2 = CreateHuman ;
7187: LD_ADDR_EXP 80
7191: PUSH
7192: CALL_OW 44
7196: ST_TO_ADDR
// LA3 = CreateHuman ;
7197: LD_ADDR_EXP 81
7201: PUSH
7202: CALL_OW 44
7206: ST_TO_ADDR
// PlaceHumanInUnit ( LA1 , KS1 ) ;
7207: LD_EXP 79
7211: PPUSH
7212: LD_EXP 82
7216: PPUSH
7217: CALL_OW 52
// PlaceHumanInUnit ( LA2 , KS2 ) ;
7221: LD_EXP 80
7225: PPUSH
7226: LD_EXP 83
7230: PPUSH
7231: CALL_OW 52
// PlaceHumanInUnit ( LA3 , KS3 ) ;
7235: LD_EXP 81
7239: PPUSH
7240: LD_EXP 84
7244: PPUSH
7245: CALL_OW 52
// PlaceUnitArea ( KS1 , ATAK_PRAWA , false ) ;
7249: LD_EXP 82
7253: PPUSH
7254: LD_INT 6
7256: PPUSH
7257: LD_INT 0
7259: PPUSH
7260: CALL_OW 49
// PlaceUnitArea ( KS2 , ATAK_PRAWA , false ) ;
7264: LD_EXP 83
7268: PPUSH
7269: LD_INT 6
7271: PPUSH
7272: LD_INT 0
7274: PPUSH
7275: CALL_OW 49
// PlaceUnitArea ( KS3 , ATAK_PRAWA , false ) ;
7279: LD_EXP 84
7283: PPUSH
7284: LD_INT 6
7286: PPUSH
7287: LD_INT 0
7289: PPUSH
7290: CALL_OW 49
// AddComAgressiveMove ( [ KS1 , KS2 , KS3 ] , 75 , 30 ) ;
7294: LD_EXP 82
7298: PUSH
7299: LD_EXP 83
7303: PUSH
7304: LD_EXP 84
7308: PUSH
7309: EMPTY
7310: LIST
7311: LIST
7312: LIST
7313: PPUSH
7314: LD_INT 75
7316: PPUSH
7317: LD_INT 30
7319: PPUSH
7320: CALL_OW 174
// vc_chassis = 14 ;
7324: LD_ADDR_OWVAR 37
7328: PUSH
7329: LD_INT 14
7331: ST_TO_ADDR
// vc_engine = engine_combustion ;
7332: LD_ADDR_OWVAR 39
7336: PUSH
7337: LD_INT 1
7339: ST_TO_ADDR
// vc_control = control_manual ;
7340: LD_ADDR_OWVAR 38
7344: PUSH
7345: LD_INT 1
7347: ST_TO_ADDR
// vc_weapon = 28 ;
7348: LD_ADDR_OWVAR 40
7352: PUSH
7353: LD_INT 28
7355: ST_TO_ADDR
// uc_side = 2 ;
7356: LD_ADDR_OWVAR 20
7360: PUSH
7361: LD_INT 2
7363: ST_TO_ADDR
// WO1 = CreateVehicle ;
7364: LD_ADDR_EXP 85
7368: PUSH
7369: CALL_OW 45
7373: ST_TO_ADDR
// WO2 = CreateVehicle ;
7374: LD_ADDR_EXP 86
7378: PUSH
7379: CALL_OW 45
7383: ST_TO_ADDR
// WO3 = CreateVehicle ;
7384: LD_ADDR_EXP 87
7388: PUSH
7389: CALL_OW 45
7393: ST_TO_ADDR
// hc_class = 3 ;
7394: LD_ADDR_OWVAR 28
7398: PUSH
7399: LD_INT 3
7401: ST_TO_ADDR
// uc_nation = nation_Arabian ;
7402: LD_ADDR_OWVAR 21
7406: PUSH
7407: LD_INT 2
7409: ST_TO_ADDR
// hc_name =  ;
7410: LD_ADDR_OWVAR 26
7414: PUSH
7415: LD_STRING 
7417: ST_TO_ADDR
// uc_side = 2 ;
7418: LD_ADDR_OWVAR 20
7422: PUSH
7423: LD_INT 2
7425: ST_TO_ADDR
// hc_gallery =  ;
7426: LD_ADDR_OWVAR 33
7430: PUSH
7431: LD_STRING 
7433: ST_TO_ADDR
// hc_sex = sex_male ;
7434: LD_ADDR_OWVAR 27
7438: PUSH
7439: LD_INT 1
7441: ST_TO_ADDR
// hc_skills = [ 3 , 3 , 3 , 3 ] ;
7442: LD_ADDR_OWVAR 31
7446: PUSH
7447: LD_INT 3
7449: PUSH
7450: LD_INT 3
7452: PUSH
7453: LD_INT 3
7455: PUSH
7456: LD_INT 3
7458: PUSH
7459: EMPTY
7460: LIST
7461: LIST
7462: LIST
7463: LIST
7464: ST_TO_ADDR
// ID1 = CreateHuman ;
7465: LD_ADDR_EXP 88
7469: PUSH
7470: CALL_OW 44
7474: ST_TO_ADDR
// ID2 = CreateHuman ;
7475: LD_ADDR_EXP 89
7479: PUSH
7480: CALL_OW 44
7484: ST_TO_ADDR
// ID3 = CreateHuman ;
7485: LD_ADDR_EXP 90
7489: PUSH
7490: CALL_OW 44
7494: ST_TO_ADDR
// PlaceHumanInUnit ( ID1 , WO1 ) ;
7495: LD_EXP 88
7499: PPUSH
7500: LD_EXP 85
7504: PPUSH
7505: CALL_OW 52
// PlaceHumanInUnit ( ID2 , WO2 ) ;
7509: LD_EXP 89
7513: PPUSH
7514: LD_EXP 86
7518: PPUSH
7519: CALL_OW 52
// PlaceHumanInUnit ( ID3 , WO3 ) ;
7523: LD_EXP 90
7527: PPUSH
7528: LD_EXP 87
7532: PPUSH
7533: CALL_OW 52
// PlaceUnitArea ( WO1 , ATAK_PRAWA , false ) ;
7537: LD_EXP 85
7541: PPUSH
7542: LD_INT 6
7544: PPUSH
7545: LD_INT 0
7547: PPUSH
7548: CALL_OW 49
// PlaceUnitArea ( WO2 , ATAK_PRAWA , false ) ;
7552: LD_EXP 86
7556: PPUSH
7557: LD_INT 6
7559: PPUSH
7560: LD_INT 0
7562: PPUSH
7563: CALL_OW 49
// PlaceUnitArea ( WO3 , ATAK_PRAWA , false ) ;
7567: LD_EXP 87
7571: PPUSH
7572: LD_INT 6
7574: PPUSH
7575: LD_INT 0
7577: PPUSH
7578: CALL_OW 49
// AddComAgressiveMove ( [ WO1 , WO2 , WO3 ] , 75 , 30 ) ;
7582: LD_EXP 85
7586: PUSH
7587: LD_EXP 86
7591: PUSH
7592: LD_EXP 87
7596: PUSH
7597: EMPTY
7598: LIST
7599: LIST
7600: LIST
7601: PPUSH
7602: LD_INT 75
7604: PPUSH
7605: LD_INT 30
7607: PPUSH
7608: CALL_OW 174
// end ; end_of_file
7612: LD_VAR 0 1
7616: RET
// every 0 0$1 do var SniperList , Sniper ;
7617: GO 7619
7619: DISABLE
7620: LD_INT 0
7622: PPUSH
7623: PPUSH
// begin enable ;
7624: ENABLE
// SniperList = FilterAllUnits ( [ [ f_side , 4 ] , [ f_class , 5 ] ] ) ;
7625: LD_ADDR_VAR 0 1
7629: PUSH
7630: LD_INT 22
7632: PUSH
7633: LD_INT 4
7635: PUSH
7636: EMPTY
7637: LIST
7638: LIST
7639: PUSH
7640: LD_INT 25
7642: PUSH
7643: LD_INT 5
7645: PUSH
7646: EMPTY
7647: LIST
7648: LIST
7649: PUSH
7650: EMPTY
7651: LIST
7652: LIST
7653: PPUSH
7654: CALL_OW 69
7658: ST_TO_ADDR
// for Sniper in Sniperlist do
7659: LD_ADDR_VAR 0 2
7663: PUSH
7664: LD_VAR 0 1
7668: PUSH
7669: FOR_IN
7670: IFFALSE 7701
// begin if GetClass ( Sniper ) = Class_sniper then
7672: LD_VAR 0 2
7676: PPUSH
7677: CALL_OW 257
7681: PUSH
7682: LD_INT 5
7684: EQUAL
7685: IFFALSE 7699
// begin SetClass ( Sniper , 1 ) ;
7687: LD_VAR 0 2
7691: PPUSH
7692: LD_INT 1
7694: PPUSH
7695: CALL_OW 336
// end ; end ;
7699: GO 7669
7701: POP
7702: POP
// end ; end_of_file
7703: PPOPN 2
7705: END
// export QW1 , QW2 , QW3 , QW4 ; export function ATAK_PRAWA_1_1 ; begin
7706: LD_INT 0
7708: PPUSH
// ; hc_name =  ;
7709: LD_ADDR_OWVAR 26
7713: PUSH
7714: LD_STRING 
7716: ST_TO_ADDR
// uc_nation = nation_Arabian ;
7717: LD_ADDR_OWVAR 21
7721: PUSH
7722: LD_INT 2
7724: ST_TO_ADDR
// hc_class = 1 ;
7725: LD_ADDR_OWVAR 28
7729: PUSH
7730: LD_INT 1
7732: ST_TO_ADDR
// uc_side = 2 ;
7733: LD_ADDR_OWVAR 20
7737: PUSH
7738: LD_INT 2
7740: ST_TO_ADDR
// hc_gallery =  ;
7741: LD_ADDR_OWVAR 33
7745: PUSH
7746: LD_STRING 
7748: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
7749: LD_ADDR_OWVAR 29
7753: PUSH
7754: LD_INT 10
7756: PUSH
7757: LD_INT 10
7759: PUSH
7760: EMPTY
7761: LIST
7762: LIST
7763: ST_TO_ADDR
// hc_basic_skills = [ 7 , 2 , 3 , 2 ] ;
7764: LD_ADDR_OWVAR 30
7768: PUSH
7769: LD_INT 7
7771: PUSH
7772: LD_INT 2
7774: PUSH
7775: LD_INT 3
7777: PUSH
7778: LD_INT 2
7780: PUSH
7781: EMPTY
7782: LIST
7783: LIST
7784: LIST
7785: LIST
7786: ST_TO_ADDR
// hc_importance = 10 ;
7787: LD_ADDR_OWVAR 32
7791: PUSH
7792: LD_INT 10
7794: ST_TO_ADDR
// QW1 = CreateHuman ;
7795: LD_ADDR_EXP 91
7799: PUSH
7800: CALL_OW 44
7804: ST_TO_ADDR
// QW2 = CreateHuman ;
7805: LD_ADDR_EXP 92
7809: PUSH
7810: CALL_OW 44
7814: ST_TO_ADDR
// QW3 = CreateHuman ;
7815: LD_ADDR_EXP 93
7819: PUSH
7820: CALL_OW 44
7824: ST_TO_ADDR
// QW4 = CreateHuman ;
7825: LD_ADDR_EXP 94
7829: PUSH
7830: CALL_OW 44
7834: ST_TO_ADDR
// PlaceUnitArea ( QW1 , ATAK_PRAWA , false ) ;
7835: LD_EXP 91
7839: PPUSH
7840: LD_INT 6
7842: PPUSH
7843: LD_INT 0
7845: PPUSH
7846: CALL_OW 49
// PlaceUnitArea ( QW2 , ATAK_PRAWA , false ) ;
7850: LD_EXP 92
7854: PPUSH
7855: LD_INT 6
7857: PPUSH
7858: LD_INT 0
7860: PPUSH
7861: CALL_OW 49
// PlaceUnitArea ( QW3 , ATAK_PRAWA , false ) ;
7865: LD_EXP 93
7869: PPUSH
7870: LD_INT 6
7872: PPUSH
7873: LD_INT 0
7875: PPUSH
7876: CALL_OW 49
// PlaceUnitArea ( QW4 , ATAK_PRAWA , false ) ;
7880: LD_EXP 94
7884: PPUSH
7885: LD_INT 6
7887: PPUSH
7888: LD_INT 0
7890: PPUSH
7891: CALL_OW 49
// AddComAgressiveMove ( [ QW1 , QW2 , QW3 , QW4 ] , 70 , 27 ) ;
7895: LD_EXP 91
7899: PUSH
7900: LD_EXP 92
7904: PUSH
7905: LD_EXP 93
7909: PUSH
7910: LD_EXP 94
7914: PUSH
7915: EMPTY
7916: LIST
7917: LIST
7918: LIST
7919: LIST
7920: PPUSH
7921: LD_INT 70
7923: PPUSH
7924: LD_INT 27
7926: PPUSH
7927: CALL_OW 174
// end ;
7931: LD_VAR 0 1
7935: RET
